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REM $ 


1.0 ABSTRACT 


THIS MAINOEC consists, OF THO PROGRAMS TO CHECK OUT 

THE D OPLIA/DFC11 ISER 

ue cH iS "RUN. He "OP TEST on TOR TN PLACE OF 
EUNCTION OF THES TEST IS TO CHECK OUT 

THE DPETIA AND CABL 


SECOND THERE IS A oyty /OFCLL E 

ult AN H3i5 TEST CONNECTOR 
Sue UNCTION OF THIS TEST IS TO 
AND CABLE. 


THESE TWO: eat ARE rrr INDEPENDENT OF en. 
OTHER AND ONLY ONE PROGRAM NEED BE RUN. THE INT 
1S TQ HAVE ONLY ONE ESTING AND DOCUMENTATION. 


THE TWO PROGRAMS OPERATE (MONITOR-WISE) LIKE 
THETR DP1: OR DULL DIAGNOSTIC ye ast RTS-- 


"OF EACH WILL FUNCTI 
SWITCH-WISE OR CONVERSATIONCHISE. TDENTICALLY. 





MERC TSER WHICH I 
ACE _OF THE *MOCEN, 
CHECK OUT THE DFC11nA 


















REQUIREMENTS 
ANY POPLI FAMILY CPU WITH 4K MINIMUM 
. R TTY OR EQUIVALENT 

. A DFCL! 

- ELTHER 2 DP1IA OR DuLz 


: EITHER A OP11 CABLE TERMINATOR OR H315 CONNECTOR RESPECTIVELY 
. MODEM CABLE 





-— © 


fj fo 








2.2 STORAGE 
MINIMUM OF 4K 
3.0 LOADING PROCEDURE 


THE PROGRAM MAY BE LOADED LIKE ANY OTHER PROGRAM 
SUCH AS: PAPERTAPE, DECTAPE, MAGTAPE, CASSETTE, DISC 
ETC. MOST COMMON WILL BE PaOER TAPE EP onb ine THROUGH THE 
USE OF ABSOLUTE LOADER. 


3.1: DFCLIA TESTING 
THIS PROGRAM(S) offi EXERCISE DFCLIA 


METHOD: INSERT OU11 OR OP11 th REQUIRED 
INSERT BFedL AND REQUIRED CABLE. 


INSERT PROPER TEST CONNECTOR ON END 


ee ce eS Se A TS A 


be cence enna eee —-- nm ee 
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OF DOFC11 CABLE PER SECTION 1.0. 


4.0 STARTING PROCEDURE 
4.1 CONTROL SWITCH SETTINGS 
FOR THE DPi1A/DFC1IA 


SWITCH O07 = 1 INDICATES SINGLE DP11 MODE WHEN STARTING 
(PLACE er bated ae NUMBER AND VECTOR 
IN SWR WHEN PROGRAM HALTS) 
=O INDICATES Cyc Lf MODE (MORE THAN ONE) 
LOC “BASCSR” AND “BASVEC” ARE USED TO PICK UP 





C NOTE: ALL SYST 
MUST BE CONFIGURED THE SAME IN THIS MODE OF OPERATION, 
FOR THE DU11/DFC11A 
SWITCH 00 = 1 od gl w Beir ADDRESSES AND VECTORS. 
(THIS IS_A FLOATING ADDRESS DEVICE - MORE THAN 
LIKELY YOU SHOUi.D ALWAYS START my SWOO= 1 AND 
ANSWER THE RESPECTIVE QUESTIONS. } 
= 0 NORMAL DEFAULT START OR RESTART. 
4.2 STARTING ADDRESSES 


200 = START ADDRESS FOR DULI/DFC11 TEST - CABLE & RESPECTIVE 
TERMINATOR MUST SE ON. 


START ADDRESS FOR DP11/DFC11 TEST - CABLE $ RESPECTIVE 
TERMINATOR MUST BE ON. 


1000 = RESTART FOR PRODUCTION RUNNING DU/DFC 


SEE _DFC11-A DOCUMENTATION FOR CORRECT JUMPERS , eee 
SETTINGS FOR OU11 OR DP11. THIS IS IMPORTANT!! 


4.3 OPERATOR ACTION 
4.3.1 DPIIA/DFC11A 


| IF SWITCH O7 WAS LEFT UP Ne PROGRAM live HALT wit: 
| THE SWITCH REG. IN THE DATA LIGHTS. XCLUDING 58 
| 
| 
| 


10 


11/10 CPU) AND REQUIRE THE FOLLOWING OPERATOR acti OR: 


A. SWOO-SWOS MUST BE SET TO THE VECTOR ADDRESS OF THE 
RST DP11. NOTE FIRST DP11 VECTOR, NOT 
THE LINE SELECTED UNLESS IT IS LINE O. 


B. SWOS-SW15 ry BE SET TO i OCTAL LINE Mae OF 
THE DOP11 TO BE TESTED. E.G. THE FIRST 
OP11 IS LINE OC. 


PRESS CONTINUE, RESET SWR AS PER S.1.1. SWITCH SETTINGS. 
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PRESS CONTINUE, THIS STARTS PROGRAM. ALL DP11 ADDRESSES 
SHALL BE ASSIGNED FROM 774400 TO 774770 ‘CONTIGUOUSLY? 


- gEt LR SECTION Y. 7A 3 PARAGRAPHS D,E,AND F FOR BAUD RATE AND 
TUH LOOP EXPLANATIONS. 


D. SEE SECTION 8.3 
DULL/DFC11-A 


IF SWITCH OO WAS BBeERT D AFTER LOADING ADDRESS 200; THE PROGRAM 
WILL ASK THE FOLLOWING QUESTIONS: 


4 gts CSR ADORESS: EG: or a eed TO 164000) 
peyl cf ye ae iy HCD TQ 776) 
RRE YOU UNNING MULTIPLE DEVICES(Y OR _N): TYPE N 
IF YES WAS ANSWERED THE MONITOR Aa sr ASK “ LAST 1 Mead S CSR 
DRESS. EG. TYPE 460080 THUS 3 DEVICES W BE 
IF WRONG ANSWERS WERE T yeep ae Res ECTIVE e 0 nESSAGES 
WILL BE TYPED. NOTE: UP TO 16 DULI/DFC11’S CAN BE R 


rE EST (Y OR ND 5S: Wy YPE Y 
Y THEN WILL ASK IF AC LINE IS 6&0 HERTZ (Y OR N) EG: ANSWER Y 
AT THIS POINT THERE WILL BE A S SECOND DELAY BEFORE THE SAUD 
oan ola gate hag IS TYPED. NOTE: THE BAUD RATE CHECK 


CAN 0 
E. LOWER CONSOLE SWITCHES WITH THE EXCEPTION OF ERROR SWITCHES. 
r. i RUNNING IN CLOCK RECOVERY MODE ABOVE 9600 BAUD PU 

P SWO3_= 1 TO ELEIMINATE ERRONEOUS INTERMITTANT ERRORS. 
GS. SEE SECTION 8.3 


OownD 





OPERATING PROCEDURE 
SWITCH SETTINGS (APPLICABLE TO BOTH TESTS) 





SWIS = 1 HALT ON ERROR 
SW1S = 1 SCOPE LOOP FOR pals CURRENT TEST 
SWi3 = 1 INHIBIT ERROR PRINT 
SWl2 = 1 INHIBIT ALL perrguT, BELL ON ERROR 
SWil = 1 INHIBIT_ITERA ea. NS 
SW10 = 1 ESCAPE TO NEXT TEST ON ERROR (DP11 atte 
SWO7 = 1 SINGLE DP11 MODE sat ONLY ON STAR 
ALSO Rake PE ECe EER TE CHECK IS WAN TED. 
SWO3 = 1 PREVENT ERRONEOUS ERRORS WHEN RUNNING DU/DFC 
IN CLOCK RECOVERY ABOVE by BAUD. 
SWOl = 1 RETURN TO BAUD RATE TEST AFTER EOP. (SW11 MUST ALSO BE UP) 
SWOO = 1 Reseh eel ADDRESS & VECTORS AND RSKS IF BAUD RATE TEST 
IS WANTED (OU11 ONLY ON START UP) 
RESTARTS NEED NOT START WITH SWO1 =1 SINCE THE PROGRAM 
WILL REMEMBER ANSWERS. 
ERRORS 


ERROR PRINTOUT 
PRINTS ALL ERRORS UNLESS INHIBITED BY SW13 OR SWle 








FOL 
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DZOFAB.P11 
ERROR PC: XXXXX THIS IS MEMORY ADDRESS +2 LOCATION. BACK UP 2 TO FIND HLT IN LISTING 
DEPENDING ON THE ERROR AN ADDITIONAL MESSAGE MAY SE TYPED OUT 
6.2 ERROR RECOVERY 
R SCOPE LOOP, SET S 
NOVvER FROM HALT ON ek oR DEPRESS CONTINUE 


e i MAY BE DESIRABLE TO SET SWi3 OR SWle IN AN ERROR 
FONDITION SO THAT AN OSC LL 8stére CAN BE PLACE ON LOGIC. 


“ 
Oo 


RESTRICTIONS 

STARTING RESTRICTIONS 

MOST LIKELY START: 

START@ LOC 200 WITH SWOO=1 FOR ae OF DULI/OFCILA 
=0 FOR RESTA 


STARTS LOC 210 WITH SWO7=1 FOR STNGLE "ppiia/oFciia 
“SWO7 =0 FOR ACT-11 & CYCLE MODE 


SEE SECTIONS 4.1, 4.3.1, AND 4.3.2 


“J 
. 
~ 


8.0 MISCELLANEOUS 
THE MONITORS ARE “CARSON COPIES” OF THE DP11 % DU! 
DIAGNOSTICS. THIS WAS TO KEE TFondtTy th Fue OPERATING 

I 


PROCEDURES, SINCE THE CHECK THE pes A nti oo" 


es” 
P_UN 

QUT 0 
DEPENDENT To N THE DEVICE DRIVING IT. KEEP 
| 
| 
| 
| 
| 
; 


THIS PROGRAM IS JUST AN EXERCISOR FOR THE Fciia Na DETAILED 
TROUBLE-SHOOTING EXTENSIVE SCOPING WILL BE REGUIRED 


8.1 MULTIPLE DP1IA/DFC11A 
REFER TO DPL1A DIAGNOSTICS 
8.2 MULTIPLE DUL1/DFC11A 
2 REFER TO DU11 DIAGNOSTIC 
8.3 SWITCH SETTINGS FOR THE DFC11A 
THE FOLLOWING APPLIES: 


A. MAKE SURE THAT THE PROPER MODEM JUMPERS ARE IN FOR 
THE RESPECTIVE DEVICE THAT IS DRIVING IT. IE OP1i OR DULL. 


B. erat saat hl S tea RATE (S2). THE BAUD RATE 
N BE SOFTWARE CHECKED IF I 


kW 
ey STEN. USE AN osc ILLOSCOPE IF NO KW11 IS Ay lea 
IF THE SOFTWARE BAUD RATE CHECK IS MADE,A DELA 


D 
= 
ps 
~ 
wm 
=z 
w 
a" 
2D 
— 
— 
m 
Oo 
_ 
a 
oH 
x 
m 
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OF FIVE SECONDS WILL vin AND THEN THE APPROPRIATE 
MESSAGE WILL BE TYPED OUT 


C. SELECT ae OPTION MODES (S1). BY CAREFUL 


SETTINGS PeuMeRSSS ACoAMBeTEMRENeD Phas, “Ode SMITH 
81-2 =0 WILL FAIL TO CLOCK DATA IN'OR OUT. 


MAKE SURE THE DFC11/CABLE IS CORRECTLY TERMINATED. 
TYPICAL SWITCH & OPTION MODE SELECTIONS OF THE 
DFC11A ARE INCLUDED IN THE LISTING FOR QUICK REFERENCE. 
PROGRAM DESCRIPTION 
SEE LISTING FOR THE DETAILS, HOWEVER THE DP11 & DUI PROGRAMS 


BASICALLY CHECK EIA LINES AND INSURE THAT DATA IS TRANSMITTED & 
RECEIVED CORRECTLY. 


eee - eee eae eee 


‘ aaron a i INOS ca a i i alta i a 
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NZDF AB. P 
303 35500 ;DU11 AND DP1IA ----DFC11A INTERFACE EXERCISER 
304 2=800  :COPYRIGHT, DIGITAL EQUIPMENT CORPORATIONS#*4x* 
305 35700  ;MAYNARD, MASSACHUSET 


355 $2505 {PROGRAMMERS BR CCHESTER/J EGOLE 
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E444 4444h4t4t4t44t4s4t4t 4st st st est sees e dest tsestetetestete 
THE POLL OUTN G PERCEIR S Te ate Be BELT INGS FOR THE OFC11-A 


Seis teeteess ea tes ceeeeees ssesepeese settee eee seseer eee tetee 
BAUD RATE SELECTION NOTE A SCOPE LOOP IS AVAILABLE 


bb ff] b= po pr 


FEFF+FFFTFFTF+FFFFF FF ++ 4+ +++ 4444 44F44t ttt ttt ttt ttss tts sts otto e+ 
gren sae rey I0 


$1-1=0 


Sl-2=1 
$1-2=0 


$1-3=1 
$1-3=0 


S1-4=1 
$1-4=0 


$1-S=1 
$1-5=0 


$1-8=1 
$1-8=0 


$1-9=1 
$1-9=0 


FFFFFFF4444 44444444 F444 +444 tt+tttttt ttt test tes stds sss sss tstttttes 
TYPICAL OFC11 SWITCH SETTINGS FOR THE DULL AND DP11 ARE AS FOLLOMS::: 





CTS WITH DELAY BASED UPCN THE SWITCH SETTINGS OF S1-6 8S1-7 
S1-7 
G CTS peLAY =0_ NOT APPLICABLE 
1 CTS DELAY= .2 SEC 
0 cTs DELAYS 1 SEC 
1 CTS DELAY= 5 SEC 
:22:S1-8 & S1-2 SWITCH SETTINGS ARE INTERRACTIVE !iiiter! 


I01 









a 


ENGINEER S BLURBS FOR THE STRAIGHT SKINNY 


a VERIFY BAUD RATE IF NO KW1l 
IS AVAILABLE. 


150 BAUD 





UD 
48C0 BAUD NOTE 2: ALL OTHERS MUST BE ZERO 
9600 me FOR THE BAUD RATE SELECTION 







NS 
CLK TURNED ON BY OFF TO ON CARIER TRANSITION 
NO EFFECT Mey CARRIER TRANSITION 


ENABLE DFC-1198 
DISABLE DFC-11A 


REC CLK TURNED ON BY 1ST - TO SPACE TRANSITION 
NO CLK DATA HAS NO EFFECT 


REC CLK RESYNCED BY ANY MARK TO SPACE TRANSITION 
NOT SYNCRONIZED 


REC CLK TURNED OFF BY ON TO OFF CARRIER TRANSITION 
TIME OUT AFTER NO DATA FOR .5 SEC 


EXTERNAL CLK 
NOTHING 


















CTS NO DELAY 


DULL DP il 
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#= CUSTOMER OPTION 
SET Se-1 THRU Se-10 FOR DESIRED BAUD RATE 


 AAADAAAADAADARRDARDDADADADARADDADDADDSAADRADSADSARDADARARARRAARRRRARAARRARRRAA 
THE a JUMPERS SHALL aaa AD AS FOLLOWS: 


O= JUMPER REMO 
l= JUMPER IN 
JUMPER 
NO. NAME FOR DULI/DFC11 FOR DP11/DFC11 
Wl EIA 0 0 
We 202 1 
W3 EIA 0 0 
W4 202 1 1 
WS 811 0 0 
We BSY 1 1 
W7 301 l 1 
W8 301 1 l 
FEFEFFEFFFFEFFEFEFFFEFFFFFFEStFtttt+ ttt +t4+stsettttsete 
TERMINATOR: ::izzzrizi:::TH ESE MUST BE ON THE DFC11 fiertees 


DUL1:: THE DFC11 SHALL SE TERMINATED WITH H315 CONNECTOR 
DP1l1l:: THE DFC11 SHALL BE TERMINATED WITH DP11 TERMINATOR 
SPAN WAN OAC et aa coe ota ets 
;OP11/DU11-DFC11A 
;COPYRIGHT APRIL 1975, DIGITAL EQUIPMENT CORP., MAYNARD, MASS. 01754 

parent INS eae 

TOAD ADDRESS 000200 

PRESS START OR PRESS al WITH SWOO=1 TO RESELECT 

;ADDRESSES AND VECTORS 

;THIS IS’FOR THE DUL1/DFC11 TEST 

ERESS START 000210 

THIS IS FOR THE OP11/DFC11 TEST 


;FOR MORE INFORMATION SEE THE 
DOCUMENTATION IN FRONT OF THE LISTING’ 


sSWITCH REGISTER OPTIONS 
SW15=100000 SI, HALT ON ERROR 









DZDFAB.P11 
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o0cc0e 


900007 


177570 


001050 


005746 


022626 


109000 


000001 
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LO 







REGISTER DEFINITIONS 






BOs GENER at BeeteTER 

Ra=%2 GENERAL REGISTER 

Ra=%3  GENESAL REGISTER 

Reaied ; GENERA RECIETER 

SP=%6 :PPOCESSOR STACK POINTER 
PC=%7 :PROGRAM COUNTER 







;LOCATION EQUIVALENCIES 


SWR=177570 ;CONSOLE SWITCH REGISTER 
Bach gs477570 sPor 11745 DISPLAY REGISTER 


STACK =1050 START OF PROCESSOR STACK 
; INSTRUCTION DEFINITIONS 
PUSHISP=S746 ;DECREMENT PROCESSOR STACK 1 WORD 

















POP1SP=S7c5 ; INCREMENT PROCESSOR STACK 1 WORD 
PUSHRO=10046 SAVE RO ON STACK 
POPRO=1°500 ;RESTORE RO FROM STACK 





PUSH. SP=24646  ;DECREMENT STACK rate 
POP. SP=22626 INCREMENT STACK TWICE 
-EQUIV EMT,HLT ;BASIC DEFINITION OF ERROR CALL 






9=1000 


6=100 


Wroul 
eo 

—Ms 
ooo 


DOWWOWODWOOWOWOWOOOwWMMm 
ee ee ee eee eee) 
u 
<£ 


AAA AA AHHH Ht Ht Ht Ht -144 
“joo 
i) 
ial) 
oO 
Oo 


—_ 
" 
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WIUTUNUTU TU UU 
Ob + bb 
Woo U Une 





MO1 





s TRAPCATCAER FOR ILLEGAL INTERRUPTS 
ia Acs T" WILL BE PLACED 
f FUPEN ADORE $0 AND see "THis WILL CATCH ANY 
STRAY INTERUPTS 
INITIALIZATION 
.PFAIL POWER FAIL: VECTOR 
340 PRIORITY 7 
“HLT 
340 
. TRPSRV 
340 



























CLR PASCNT 


sCL PA 
JMP DULL ;G0 





EAR # OF PASSES 
TO START OF TEST 









MOV gt ,DD.A ;SETUP FOR RETURN AT START OF TEST 


ALIN ;CLEAR LINE 
CLR el ¥ :CLEAR # OF PASSES 
CLR sSETUP FOR BAUD RATE TEST 
JMP Fi :GO TO START OF TEST 











JMP DU11.A ;PRODUCTION RESTART AT REGULAR DU TESTS 











; INDIRECT POINTERS TO TELETYPE VECTORS AND REGISTERS 





177560 ; TELETYPE KEYBOARD corn REGISTER - 
177562 : TELETYPE KEYBOARD DATA BUFFER 
177564 : TELEPRINTER CONTROL REGISTER 
177566 ;TELEPRINTER DATA BUFFER 








;PROGRAM CONTROL PARAMETERS 


;SCOPE ADDRESS FOR LOOP ON TEST 
ADDRESS OF NEXT TEST TO BS EAE CUTED 
ADDRESS FOR LOCK ON CURRE 
:NUMBER OF ITERATIONS THAT “CURRENT TEST WILL BE 
;NUMBER OF ITEREATIONS COMPLETED 
R OF TEST IN PROGRESS 








ONDNOB0O0OO00D 







T ROR 
PC OF LAST ERROR CALL 
;PROGRAM VARIABLES 
0 ; TEMPORARY STORAGE 


0 ; TEMPORARY STORAGE 
TEMPORARY STORAGE 
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Oo 
oO 
b--b-* 
rr 
— 
—-ONOM CMO 
~ 
** COOK KHOOOOOOV OOOO VDOOOOO OOO OOD00000 


S& S866888EE888E 8 
-_ =p b-- 
TUTUS-- o-+9-— 

TUTUe—- b-+— bb 


ast atu: “ORD 0 
it ” “WORD 0 






; TEMPORARY STORAGE 
: TEMPORARY STORAGE 


;RO STORAG 


;RS STORAGE 

STACK POINTER STORAGE 

; PROGRAM COUNTER STORAGE 
W DEVICE STORAGE 

DP DATA STORAGE 


;SYNC CHARACTER STORAGE 
LINE NUMBER STORAGE 


; TRANSMITTER gt ae 


;RECEIVE DATA S E 
;CHARACTER LENGTH STORAGE 
; OF colt ST 

;SYNC COUNT ST E 


ORAG 
CONSOLE SWITCH = aia 





;PROGRAM RTI RETURN STORAGE 
RETURN TO BEGIN TEST STORAGE 


;CLOCK STORAGE 


50/60 HERTZ STORAGE 
+ HF crvstaL PROGRAM CONTROL STORAGE 
; BAU UD RATE TEST STORAGE 


sPAUD RATE FLAG STO 
“BAUD RATE TEST STORAGE 


;CHARACTER COUNT STORAGE 


ONCE ONLY it STORAGE 


:PRESET CYCLE COUNT 2a FOR KW11 


; INTERRUPT COUNT _STORA 
:KW11 CSR STORA 
:START OF TEST STOR 


AGE 
SRONTROL STORAGE FOR BAUD RATE TEST 
:POWER FAIL CONTROL STORAGE 































FES 
=e 


arate 


BE0R000 


DoDER-8 v yhlehee 


zs 


SB8888 8888 
—ONIOUMNL ts 


& 
o-- 
tf 
ao 
o 


001270 
001270 
O0te7e 
001274 
001276 
031300 
003302 
001304 
001306 


Er. 732) 


ccocos0 


CiO4le 


e4soa 
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BOe 






;PROGRAM CONTROL FLAGS 


INIFLG: .BYTE 0 ;PROGRAN INITIALIZATION FLAG 

STFLG: .BYTE 0 ST STAR 

ERRFLS: .BYTE 0 iERROR Occ URED FLA 

LOKFLG: .BYTE 0 KON CURRENT fest FLAG 
; PROGRAM CONVERSATIONAL babi ERS 

SYNCNO: [BYTE 377 + OF maha REQ*D FOR SYNC’ ZATION 

SEXMIT: .BYTE 377 SEC “ATT JUMPER “IN™ 

SEREC: .BYTE 377 :SEC REC JUMPER “I 

OPTCLR: .BYTE 377 : OPTIONAL JUMPER CLR “IN” 

MULTD: 8YTE 9 :NO MULTIPLE DEVICE F 

JNRBY .BYTE 377 ‘EXTERNAL MODEM ayEasé AG UNPER “IN” 
sPROGRAM MULTIPLE DEVICE PARAMETERS 

BASEADD: 0 :PROG CONTROLLED 1ST DEVICE ADDR 

KEEPADD: 0 :SAVED IST DEVICE ADDR 

LASTADD 9 :LAST DEVICE RXCSR ADDR 

BASEIV: 9 :PROG CONTROLLED IV 

KEEPIV: 0 :SAVED INTR TOR 

ACTREG: 0 ;ACTIVE REGISTE MODIFY THIS 

:LOCATION 70 pisalAL Fy OR QUALIFY 
VICES ¢ DON’T RUN) 

ROTADD: 9 ‘ROTATING BS INTER’ 13a ACTREG. .POINTS 

:TO DEVICE PRESENTLY UNDER TEST WHEN RUNNING MULTIPLE DEVICES 


;PROGRAM CONTROL FLAGS 


$Y=0 


fs ae FOR TRAP ad es CALLS 


POINTERS TO SUBROUTINES CAN 


oN THE TABLE IMMEDIATLY FOLLOWING THE DEFINITIONS 


¢ RRSLAAEAFALSSLASLELELAALLELESFLREAALLALALLAFRELL LARA LARELAAALTATFAALRILA 
+ SEERESEREEREREE RASS AEEREEER ELSE RL EERLE EEA SEAS EAL ER ELE AEA ELAR EEE REE SS 


PTAB: 
SCOPES TRAP+0 


;CALL TO SCOPE LOOP AND ITERATION HANDLER 


DELAY=TRAP+1 ‘ ;CALL TO DELAY FOR SPEC. TIME. 
SCOPL=TRAP+2 ;CALL TO LOOP ON CURRENT DATA HANDLER 
TYPE= TRAPS ;CALL TO TELETYPE OUTPUT ROUTINE 
SAVOS=TRAP+4 ;CALL TO REGISTER SAVE ROUTINE 
RESOS=TRAP+S ;CALL TO REGISTER RESTORE ROUTINE 
CONVRT=TRAP +E ;CALL TO DATA OUTPUT ROUTINE 


. CONV 
CNVRT=TRAP+7 
. CNVRT 


-;CALL TO DATA OUTPUT ROUNTINE WITHOUT CRYLF. 
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serr.octitgel 
INSTER= TRAP +13 
SCOP2=TRAP+14 

Scope 


~je- 


OG cruwrnnwe-o 


5 RRRRRARLERESAR AEE RRR RRL EEEE RARE ELSES ESSE SERRE EL ELE LEAL LE EA EEE EE LEE ES 
5 RERRERRERRE REL ELE REELS ERE EA EEL REA REL ERE RESELL ELE EERL ALAA ESSE SLES ES 
F ees BIT DEFINITIONS 


;RXOBUF BIT Oe NER 


1 
-PARCSR BIT DEF IAT 


-PARCSR WRD DEFINIT 


“SR BIT DEFINITIONS 











CALL TO ASCII STRING INPUT ROUTINE 
;CALL TO NUMERICAL DATA INPUT ROUTINE 
;CALL TO FLAG SET ROUTINE 

;CALL TO INPUT ERROR HANDLER 

;CALL TO SEQUENCE TEST SCOPE LOOP 













;DATA SET CHANGE 


N 
CLR TQ SEND 
; CARRIER DETECT 
ACTIVE 


SEC REC_DATA 














N 
:DATA TERM RDY 













Y ENABLE 
ARITY SENSE 


C YEXTERNAL MODE 
; SYNC INTERNAL MODE 


M 
SWORD beter > BITS 


1¥ 
I we 
=P 
: EV ’ 
IT 
; SY’ 








SEV EN PARITY 
yet il NOT_ AVAILABLE 
7M 1 ad DATA 


‘XMIT DONE 







DZOF AB. P 


TU TU & + b+ b= 0 b= 9-0 
-O0OD0 NIMOU LWT >-C).0 (0 ~ 


ix Pas Pas Sas Jas Jas as Jae Pa a ee ee 


dam ye 


el eed 
GIG) 
om) 
Oo 


001352 


001372 


97,792) 


Elid SE? 


000100 


000801 


tet 


174770 


160040 


000770 
090772 
000774 
000776 
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7.300 :DUL1 REGISTER POINTERS 


72600 i DEERRLT DU ADDRESSES 









$9000  TXINTE=BIT6 sXMIT INTR ENABLE 
69190 ONAINTE=8ITS NR INTR ENAB 
69200  SEND=BITY N 
69300 HDXEN=BIT3 i HOX/FOX 
69400  BREAK=BITO : BREAK 
69500 : TXCSR WROD DEF INET IONS 
600  uUSER=0 MODE 
69700 MINT=4000 : MAINT INT MODE 
$9800 MEXT=190000 :MAINT EXT MODE 
69900: syYSTST=14000 :SYSTEM TEST MODE 
70000 
70860 HHH HEHEHE HEHEHE HEHEHE HEHEHE HEHEHE EE 
fd 


70400 OPRS: .BLKW 1 ‘ ;OP11 RECEIVER ‘STATUS 
:  .BLKW 1 DP11 RECEIVER BUFFER 
> .BLKW 1 ‘SYNC BUFFER 
70700 OPTS: .BLKW 1 ;DP11 TRANSMITTER STATUS 
: 1 ;DP11 TRANSMITTER BUFFER 
1 :DP11 SYNC EXTENSION 








71006 

71100 

VPAV-IUGMEEETTITISTICCTIC CCITT ttt Titi titii ti titttti itt ttittitisttittitttty 

71300 DPRIV: -BLKW 1 ;O0P11 RECEIVER alt a dd VECTOR 

71400 DPR ~BLKW 1 DPI ll RECEIVER 

715090 SOT: -BLKW 1 :DP11 TOA AMT ITER INTERRUPT VECTOR 

71606 OPTP: .8LKW 1 :OP11 Mego PRIORITY 

71700 BASVEC: 300 ms :TH HIS IS THE FIRST VECTOR. PATCH FOR YOUR FIRST 
cia BASCSR: 174770 IFIRST CSR ADDRESS. MAKE IT YOURS. 









7OCOD —«-_-, RHRAHRHARARALES REE RE RESELLER RAL LEAR ALARRL EEA LAL EARL EER AEE SELLERS 






72500 j RRERERRAREERERERERERRAL ELE REALL E RELA ARAALAR ARERR ERLE ERS ARE LES 






60046 

“DEFAULT DU VECTORS 

73300 DURIV: ?70 :REC INTR VECTOR 

73400 OURIS: 772 !REC _INTR STATUS 

73500 OUTIV: 774 ?XMIT INTR VECTOR 
: 776 :XMIT INTR STATUS 
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000733 





001050 


=) 
000012 


911563 
li 77570 


006306 


006014 
006306 
006064 
001632 
001240 
001240 


001221 


002636 
002370 
000002 
002636 


177226 
001144 
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1024 


001066 


001206 


001060 
177570 


001060 
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00200 





E02 





pHEHRREPART2 DB2SS CONNECTOR TEST SECTION####x# 


OP11 


X.DP: JSR 
BGNOA: R, 
PARTe: 

G 
BOTSTFLG 
TSTB 


PART3: MOV 


1$: J 
DP. UPDATE: 
SMI 


aSTACK SP 
sOrrl PSTART 


#OP11°A, RETURN 
#DP 1A 


R ‘ 
#10. , ICOUNT 
(PC}4 

. +6 

DPTITLE 
wR 


BGNOA 
PC.CLAVEC 


PC,LINE.N 
PART 


Be CLRVEC 
PC; LINE.X 


tMELG EP 


BDTSTFLG 
+6 

BAUD 

#0P11.A, RETURN 
SHO, SHR 
8BAUD , RETURN 
DRETURN 

TSTB. — SAVSR1 
PART2 


;SET UP STACK POINTER 
:SET PROCESSOR PRICRITY = 
SETUP POW 

: SETUP FOR REGULAR TEST 
:DITTO 


‘oo SETUP 
sDITTO 

;8OF ITERATIONS 
s;ONCE ONLY 


; TEST FOR sie a DP ADRS 
BRANCH IF NO CHA 
iLO ENTIRE VECTOR AREA WITH 


HALT 
‘FETCH LINE NUMBER FROM SWR 


;CLEAR_OUT VECTOR AND GET NEW NUMBER 
:GET NEW LINE NUMBER 


;SETUP FOR RETURN 
sr pret TIME? 


YES 
!QUTPUT MESSAGE & GET INPUT STRING 
SET FLAG BASED UPON INPUT STRING 
“THIS FLA 
09 You WAN? TO RUN SAUD TEST? 


;YES 
;SETUP FOR RETURN TO START PROGRAM 


;G0 START 
eu DEVICE? 


sYES 








FOe 
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+ RHRKHHKRRKSH PORTS HHRRKKRHLSAE RHEE 
9090s Ull: RESET 
see 9 MO #DUL1.A,RETURN ;SETUP FOR REGULAR TEST 
il BOULL.A:NEXT  ; Fi 
RXCSR, ,DEVICE  ;SETUP FOR EOP MESSAGE 
s CLEAR OUT FOR FIRST TIME THR 
;S PROCESSOR PRIORITY = 7 
“SETUP STACK POINTER 
:SET UP POWER FAIL 
sSET UP FOR RETURN TO START OF TEST 
*CLEAR LIST 
?CLEAR ERROR COUNT 
:SETUP FOR REPEAT 
: :SET ITERATIONS = 10 
901240  INIFLG “sCHECK FOR FIRST TIME 
BNE ONCE :NO 
011476 DUTIT : YES 
: 3 CHECK FOR CONVERSATIONAL 
177570 : s CHECK FOR BAUD RATE 
001060 #START,RETURN ° 
02800 BR 2$ 
012250 : MR ;LET QPERATOR KNOW TEST Is RUNNING 


003110 001060 KOULL.A,RETURN :G0 TO 
1770le : JRETURN 


Mow MmMcpiwomwa 
0 b+ b+ bb bb be ho () 
OM ICU UIfue- 


3 


821 
822 
823 
824 
82S 
826 


; OUTPUT MESSAGE & GET INPUT STRING 
‘CONVERT STRING 

SLOW LIMIT 

HIGH LIMIT 

STORE AT THIS LOCATION 


:HOW MANY TIMES + 2 
PC, OKADR CHECK FOR VALID ADDRESS 
001254 DUBASE,KEEPADD ;SAVE 
PC, DUADDR :GET ADDRESS 
001254 oo1252 KEEPADD,BASEADD ;RESTORE FOR ROTATION 
T SQUTPUT MESSAGE & GET INPUT STRING 
‘CONVERT. STRING 
LOW LIMIT 
HIGH LIMIT 
STORE AT THIS LOCATION 


: K 
i" 4 ; HOW MANY TIMES + 2 
001364 OOlebe DURIV,KEEPIV 
001364 001260 MO DURIV: BASEIV Ser UP FOR ROTATION 
OUTPUT MESSAGE 8 GET INPUT STRING 
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pest oe 


104412 


18893? 


000137 
104410 
01203 


000177 
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001250 


001264 
001265 
002334 


000001 
001264 
001266 
001265 


00001° 
091256 


001266 
pocoo1 
001254 
001254 


002212 


001221 


004274 
003110 
176470 


001266 
001264 


001252 


001252 © 
001264 


001266 
001252 


001252 


001080 
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04200 
04300 


coe 


SETFLG eer iv. BASED UPON INPUT STRING 


MULTD 

TSTB MULTD ‘AR ai! F NUL TIPLE DEVICES 
ON THE SYSTEM 

Es :YES,ASK NEXT QUESTION 


;CLEAR POINTER 
: JUMP AROUND NEXT QUESTION 


; OUTPUT MESSAGE & GET INPUT lain 
CONVERT STRING 
LOW LIMIT 


HIGH LIMIT 
STORE AT THIS LOCATION 


“BYTE 1 HOW MANY TIMES + 2 
“THE FOLLOWING ROUTINE SETS UP nition EDR THE FIRST TIME 
is: MOV #1 ROTADD ;SET UP POINTE 
ac REG CLR ACTIVE REGISTER 
ROTADD,ACTREG :MAKE THIS DEVICE ACTIVE 


ROTADD sSET UP POINTER 

3$ ;ARE YOU OUT OF RANGE 7 
- #10,BASEADD ;SET_UP BASE ADDRESS 
LASTADD,BASEADD ;IS ere ae LAST DEVICE ? 


;NO 
ROTADD, ACTREG 3 THIS SUMES THAT THERE ARE A 


AS 
LEAST TWO DEVICES WHEN YOU ANSKER YES TO 
;MULTIPLE DEVICE QUESTION 
#1 ,ROTADD SET UP FOR LATER USE IN END OF PASS ROUTINE 
KEEPADD, BASEADD ;DITT 

MUL :CONTINUE QUESTIONS 


_cPADD,BASEADD :RESTORE 
OUTPUT MESSAGE & GET INPUT STRING 


'CONVERT. STRING 

{COW LIMIT 

tHIGH LIMIT 

ISTORE AT THIS LOCATION 
!HOM MANY TIMES + 2 

'D0 IT AGAIN 

SOUTPUT MESSAGE 8 GET INPUT STRING 
SET FLAG BASED UPON INPUT STRING 


LG 
aC TSTFLS No YOU hiaNt To” RUN BAUD TEST? 


JMP START YES 
OUTMUL: MOV #DU11.A,RETURN ‘G0 START REGULAR TEST 
JMP RETURN 





HO02 
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2DFAB.P11 
303 00200 s CABLE TEST WITH OUT EXERCISING THE SOFTWARE CLOCK. 
310 00300 ;IN THIS TEST FUNCTIONS OF THE CABLE WILL BE 
911 00400 :TESTED withouT THE SOFTWARE CLOCK. THe CLOCK MUST BE 
312 00500  ;SUPPLIED BY THE DFCi1. 
313 00600 
914 00700 =; DFCLI-A TEST!!! 
a SS ens LAE Tr A a. 
ais asta iB tN NG UP "CL PERE 70§ SND AND “MODEM READY”. 
318 01100  ;VERIFY ALSO THAT T 
319 01200 ;NOTE: THE REcas CLOCK IS NECESSARY FOR 
920 01300 “THIS TEST TO WORK 
921 01400 
S22 01500 : KEKKKRHAALFAARAHLHFE: 
933 o1600 =: 
934 1700 : DP11 TEST FOR THE DFC1I-A 
Ses 01300 : RHKLSKXLLA RE RFLAHK EK LKFKHEFEEE 
927 02000 
828 002370 02100 OP11.A: 
$29 5 RRLERRLEREERE 
930 : 
931 : TEST 1 
932 ; 
933 : HEERHRALL EERE 
924 © REKLKLHLE RHA E RELA LEHR RARE LL ELLER FERAL AAALARASRARERERERSSERRKESZERE 
935 002370 012737 o00001 001072 STl: MOV #1,T TNO 
936 002376 012737 003124 001062 MOV #TST2 
937 002404 012737 001632 001206 02300 MOV #02. ;tPoATE CONT. SET FOR RETURN AT END PASS 
938 002412 012737 002370 O01060 O2400 MOV #DP11.A,RETURN ;SET RETURN ADDRESS. 
$39 002420 012737 007736 O00106e Oeso0 MOV #. EOP NEXT GOTO END Pace aT END OF TEST. 
840 002426 005077 176676 02600 CLR aDPTS : :CLEAR THE TX STATUS 
941 002432 905077 176664 02700 CLR JDPRS CLEAR THE RX STATUS. 
942 002436 905002 02800 CLR R2 :SET TIME OUT 
943 002440 012700 013000 92900 MOV #13000, RO 
944 002444 019277 176662 03000 MOV Re. SDPTB ;LOAD THE TX BUFFER 
945 O0c4SO 017701 176654 03100 iS: MOV JDPTS, Ri 
945 002454 042701 164777 93200 BIC #tC<13000>,R1 
$47 002460 022701 013000 03300 CMP #13000,R1 
948 902464 OO1406 03400 BEQ 2$ 
949 O02466 905202 63500 INC R2 ;UPDATE DELAY 
850 002470 091367 03600 BNE 1$ :IS IT DONE? 
951 0900472 104001 02700 _ HLT 1 ‘ERROR REQUEST TO SEND,CLEAR TO 
9S2 03800 :SEND AND MODEM READY NOT LP. 
953 002474 012737 OD000S o01120 03900 MOV #5, TEMP12 
954 O02S02 o0so0e2 O4000 2S: CLR R2 :SET FOR TIME OUT 
955 002504 o0S202 04100 INC Re : DELAY 
956 002506 001376 04200 BNE 2 : 
967 002510 032777 013000 176612 04300 BIT #13000,90PTS § ;ARE THEY GONE? 
958 002516 OO1404 04400 BEO 
959 O02520 005337 001120 04500 DEC TEMP12 
960 002524 001366 04600 BNE 25 
961 O02526 104000 04700 HLT 
962 04800 
363 04900  ;VERIFY THAT THE SETTING OF “TERMINAL READY" BRINGS 


364 ha 05000 ;UP “RING” AND "CARRIER DOWN” ALSO VERIFY THAT 





DZDFA 


a 


Ropeto ptt MACYL1 27(732) 


poses | 


002622 





012777 
4401 


164000 


005037 


if4400 


agi800 


176562 
1$3776 
024001 


000001 
001500 
120000 


901102 
001104 
006450 
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176872 


176540 
176526 















10e 





OS100 ;CLEARING “TERMINAL READY” BRINGS DOWN “RING” 
05200 AND "CARRIER DOWN". 


05300 
05400 38: MOV #BITO, dDPTS ;SET_ TERMINAL READY 

0550 DELAY 1500" ‘WAIT 

0560 HOV 3OPT ‘GET WORD 

0570 BIC ePeceaCOL> R1 CLEAR UNWANTED BITS 

05800 CMP #24001,R1 ‘DID RING AND CARRIER DOWN SET? 
05900 BEQ +4 ¥ 

06000 HLT i *NO--TYPE ERROR 

06100 BIC #BITO, dDPTS :CLEAR TERMINAL READY 

06200 DELAY ,1 ‘WAIT . 

96300 CMP $120000,20PTS :DID THEY CLEAR? 

064 BEQ +4 :Y 

06500 HLT :NO--TYPE ERROR 

06600 


pene ;NOW TEST THAT DATA CAN Fe TRANSFERED 
O A BINARY COUNT PATTERN WILL BE TRANSMITTED AND RECEIVED 
O6900  ;WITH OUT THE USE OF THE SOFTWARE CLOCK. 





07000 

07106 CLR TEMP 1 ;CLEAR OUT INFO 

07200 CLR TEMP2 ;DIT 

07300 JSR PC,SEQ.DATA ;GO RUN SEQUENTIAL DATA TEST 
07400 SCOPE 


JO2 
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;fHIS IS THE SETUP FOR THE BAUD RATE TEST USING THE DP 
5 ERR EERE REIL ERE RHEE EE EATER EEE EIT AERA HAHA EEE 


| 0 
Ole737 000372 O01224 OT60: MOV sis 3250 HERTZ SETUP 


0 J KWSE 
177776 BAUD: #340, PS :SET PROCESSOR STATUS = 
M #STACK, SP *SET UP STACK 


RX: 
176456 DPSETUP: MOV BCON. RX aOPRIV :SETUP RX VECTOR 
M PROCESSOR STATUS 
a. “Tha BPPTIV -SETUP TX TRAPCATCHER 
#340, aDPTP iPraceeoe STATUS = 7 
TCNT ONLY 
TURN ON RECEIVER 
:SET SYNC CHARACTER 


: Se 
112777 000252 176400 “LOAD T 
005037 OOle2e CHCN : CLEAR CHARACTER COUNTER 


004737 005456 PC, CLOCK ;FIND OUT IF KWil IS AVAILABLE 
O01ele NO. - CLOCK 


903042 TST.2 NO. CHECK SW 14 FOR SCOPE LOOP 
;OUTPUT MESSAGE & GET INPUT STRING 
iSET FLAG BASED UPON INPUT STRING 

001214 TSTB. = CPSFLG *1S AC SO OR 60 HERTz 
50 HERTZ 


NOTEO : 
o004s4 001224 #300.,CLKSET  :60 HERTZ 
004462 KWSETUP :GO SETUP KW 
; THIS IS THE BAUD RATE INTERRUPT SVC ROUTINE 
© LESLHHARELAKEL ALA KALA HAE S SSL AHA SHEL AES EL EERE ELSE KRESS ELEXR 
001222 BON.RX: INC CHCNT :COUNT FOR BAUD RATE CHECK 
176310 TST JOPRB :CLR BUFFER 


1 R 
006012 N. TRAP: ; ) he hitaliet ; TRAPCATCHER FOR TX INTERRUPT 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


ONONKDOOVO0O00000 
nN TU bb bb bd hee 
OWONWUI£L Wu O 


R 
040000 177570 100 =SW14.B: #BIT14, SWR ;FIND OUT IF BAUD RATE CHECK IS WANTED 
e 8 TSl.g ;NOT YET 


Bo0137 003072 nay OUT: PT : YES 
104410 "INSTR OUTPUT MESSAGE 8 GET INPUT STRING 


iSET FLAG BASED UPON INPUT STRING 
001216 TSTB  BAUDFLG 90 YOU STILL WANT TO RUN BAUD TEST? 


8 W 
012535 , MSCOPBAUD YES. FIND OUT IF SWITCH 14 1s uP 
ole :WAIT FOR OPR TO PUT UP SW 


J SW14.B 
176230 PT: ane errs ; TURN ON TRANSMITTER 
003104 : MAINPR 





Bw NU EWM OR RORR 
1 


NMUN EOI OO WON UE WIM O WON MULE WN OWONOUCWIMH-OwWDd~j10 


b= bs hs hs be bs be bb 2 be be Be bo 0 bb 8 be 2 bs bo be bs be 2 0 =o bo ho 2 fo bo po ho ho pe ps ae 
EEE EEE WWIWWWWWWW Grrr rrrrururu 


+ bb b= = 2 8 0 0 0 0 8 0 0 Bb 0 0 bb = = 0 + Bb 9 8 9b bo 9 bo pe pe pp pe 


003312 
003320 


003226 


0034S4 
OO34S6 
003460 


003462 


003506 
003510 
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ooc4ee 


012737 


000416 
020001 


001401 
104002 


013737 


104006 
104400 





LOe2 
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000920 176040 17300 MOV #USER! SEND, JTXCSR ;0K_ NOW LOAD SEND & USER MODE 
000120 1760e4% 17400 BIS #SYNSCHIRINTEN, JRXCSR ;SET SEARCH SYNC & 
17500 ;RECEIVER INTERRUPT 
17600 ;ENABLE & WAIT FOR INTERRUPT 
001112 17700 CLR TEMPS 
17800 «= 38: CLR Re 
17900 INC Re ;WAIT FOR INTERRUPT 
1 18000 BNE =e 
OOllie 18100 INC TEMPS 
000003 O0llle 18200 CMP #3, TEMPS 
18300 BGE 3$ 
18400 HLT 4 ; INTERRUPT DID NOT OCCUR 
SD lA 


18700 ;THE FOLLOWING IS THE INTERRUPT SVC ROUTINE 
: MOV #340, PS 





000340 177776 18800 2$ :PREVENT INTERRUPTS 
175760 18900 MOV JRXCSR, RY : SAV 
175756 19000 MOV JRXDBUF , R1 : ACTUAL 
901366 175760 19100 MOV DURIS, JOURIV RESTORE TRAPCATCHER 
175756 19200 CLR JDURTS 
003454 19306 MOV #5$, (SP) SET UP RETURN 
000100 175730 19400 BIC #RINTEN, ORXCSR CLR INTERRUPT ENABLE 
a 
000100 175720 19700 4s: BIC #PINTEN, JRXCSR _;CLR INTERRUPT ENABLE 
000340 177776 19800 MOV #340,PS’ : PREVENT’ INTERRUPTS 
001366 175716 19900 MOV DURIS,SDURIV RESTORE TRAPCATCHER 
175714 20000 CLR DURTS 
20100 BR 
20200 
20300 «S$: CMP RO,R1 
20400 BEQ +4 
20500 HLT 2 sCHARACTERS DID NOT MATCH 
20600 ‘IF DU/DFC ARE RUNNING IN CLOCK 
20700 “RECOVERY ABOVE 9600 BAUD AND THIS 
20800 “ERROR OCCURS PUT SWO3 = 1. TH 
20300 ERROR Is LEGITIMATE ONLY IF BELOW 
601352 001110 21100 MOV RXCSR, TEMPY :SETUP FOR ERROR MESSAGE 
000200 21200 MOV —- #RXDONE, RO ; EXPECTED 
21300 MOV R4.RI ACT 
177577 21409 BIC #ti<RXDONE>,Ri ;SAVE ONLY RXDONE 
21500 CMP RO.R1 
21600 BEQ +4 
21700 HLT 6 :FALSE INTERRUPT 
21800 
21900 
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1148 90200 33 THIS TEST VERIFYS THAT THE DFC11A IS CLOCKING DATA IN & OUT 
1150 00400 ::NOTE: THE BCOSC MODEM CABLE MUST BE ATTACHED TO THE DFC11A 
1151 00500 :: & MUST BE TERMINATED WITH H31S CONNECTOR 
1152 00600  ;;MODE: SYNINT 
1153 00700 ;;LENGTH: EIGHT 
1154 00800 ::THIS TEST USES BOTH THE RECEIVER & TRANSMITTER LOGIC 
1155 00900 © © KEKLKEALKKLELKRK HEAL LE KK KEKE KASSEL KK EKA KALE RLLEZEE 
1158 0035i2 01000 11.B: 
1157 + REXERKKRREREE 
i158 4 
1159 : TEST 3 
1160 
1161 + KEKKEREKKEERE 
1182 © KKEKKHK EHH EE KEK KEKE EHSL KEKE KEKE EKLE KLEE KLE L ERE HELE KEKE EE LERLEEE 
1183 003512 012737 000003 001072 ST3: MOV #3, TST ‘ 
1164 903520 012737 007736 00106 MOV #. EOP, NEXT 
1165 003526 052777 O00400 175624 o1200 BIS #MRESET,JTXCSR ;MASTER RESET 
1166 003534 012777 030000 175614 01300 MOV #SYNINT, JPARCSR ;SET THE MODE 
1167 003542 052777 O00400 175610 01400 BIS #MRESET; JTXCSR :MASTER RESET 
1168 003550 012777 900020 175602 01500 MOV #USER! SEND, a TXCS -SET USER MODE AND SEND 
1189 003558 012777 836026 175572 01600 MOV #SYNINT!EIGHT!NOPAR!26,aPARCSR ;SET SYNC INTERNAL, 
1170 01700 sEIGHT BITS PER CHAR,NO PARITY 
1171 01800 “AND "26" FOR THE SYNC CHARACTER 
1172 903564 052777 oO00436 175560 01900 BIS #SYNSCH! STPSYN! DTR!RTS!STD. JRXCSR -SET SEARCH SYNC & 
1173 - 92000 ;STRIP SYNC SO THAT RXDONE ASSERTS 
1174 02100 “WHEN CHAR "25" ARRIVES AND NOT BEFORE... 
1175 02200 : ,,, THEREFORE,SET STRIP SYNC 
1176 02300 -ALSO SET DTR, RTS,& STD FOR THE DFC11A 
1177 02400 
1178 02500 ee ra WAIT FOR SYNSCH TO BE 
1179 02600 -CLOCKED IN: BY CLK 
1180 003572 005037 001112 02700 eLR TEMPS 
1181 003576 o0So002 02800 CLR Re 
1182 003600 005202 92900 INC Re WAIT 
1183 003602 001376 03000 BNE .-2 
1184 003604 005237 001112 03100 INC TEMPS , 
1185 003510 022737 000003 O01112 03200 CMP #3, TEMPS : 
1186 093616 002367 03300 BGE .-20 ;GO BACK TO CLR Re AND WAIT SOME MORE 
1187 003620 012777 oOO4O22 175536 03400 MOV #25, JOURIV :SET UP TRAPCATCHER 
1188 003626 012777 O00340 175532 O3500 MOV #340, JDURIS -SET PROCESSOR STATUS = 7 
1189 003634 012777 OO4100 175526 03600 MOV #33, MOUTIV -SET UP TRAPCATCHER 
1190 003642 012777 000340 175522 03700 MOV #340, IDUTIS :SET PROCESSOR STATUS = 7 
1191 003650 005037 177776 03800 CLR : I 
1192 003654 013737 001354 001110 03900 MOV RXDBUF,TEMP4Y § :SET UP FOR ERROR MSG © 
_ 1193 003662 012700 000025 04000 MOV #25, RO : E 
1194 003666 012737 000003 001106 04100 MOV #3, TEMP3 :# OF SYNC CHARS TO GET INTO 
1195 04200 - SYNCRONIZATION 
1196 003674 052777 OO0100 1754SO 04300 9S: BIS HRINTEN,ORXCSR ;SET INTERRUPT ENABLES 
1197 003702 052777 oO00100 175450 oO4400 BIS #TXINTE.@TXCSR » 
1198 003710 000137 003726 04500 JMP 83 ‘THE FIRST XMIT INTERRUPT SHOULD COME 
1199 04600 -FROM TXDONE = 1 AFTER A MASTER RESET 
1200 003714 112777 oOO00026 175440 04700 1S: MOVB #26, JTXDBUF ;LOAD SYNC CHAR 
1201 003722 005037 OOil1ie 04800 CLR TEMPS 
1202 003726 o0s00e2 04900 «gs: CLR Re ;WAIT FOR INTERRUPT 


1203 003730 O0Se0e 0S000 INC Re 
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bb p= po be pe ps pe pepe 


003732 


BONDIE 


004020 


O040e2 


0o4076 


004100 
po4104 
004106 


004112 
004114 
004120 


004122 


004220 


271732) 


001376 


104003 


000521 


000002 


005337 
100403 
012716 


o0000e 
112777 
04 
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NOe. 


jamie! TO WAIT 


5100 BNE 2 
ce a ee 
bea95 te ee Oo back. 
000340 177776 os500 MOV + BREVENT’ AATERRUPTS 
900100 i75374 oS600 BIC SIXIATE, aTXCSR CLR INTR ENABLES 
! 0100 175360 05700 BIC #RINTEN, JRXCSR :BUET0 
1366 175364 0o5800 MOV DURIS, JOURIV STORE TRAPCATCHER 
175362 05900 CLR JDURI 
001372 175356 06000 MOV DUTIS, SDUTIV ;RESTORE INTERRUPT CATCHER 
175354 06100 CLR JOUTIS 
0620 HLT 3 ; TXDONE INTERRUPT FAILED TO OCCUR 
0630 ATCH OUT HERE::: THIS FAILURE MAY 
06400 ppt BE CAUSED BY TRANSMIT DATA NOT 
06500 ‘BEING CLOCKED OUT. I.£. _TXDONE 
56600 ‘NOT RE-ASCERTING 50 THAT THE 2ND 
06700 :SYNC CHARACTER CAN BE LOADED 
D680 BR 75 GET OUT OF THE TEST 
97000 i THE FOLLOWING IS THE RECEIVER INTERRUPT SVC ROUTINE 
175324 07200 MOV JRXCSR Ry ;SAVE 
175322 07300 MOV JRXDBUF ; R1 : ACTUAL 
001366 175324 07400 MOV DURIS, JDURIV § :RESTORE TRAPCATCHER 
175322 07500 CLR :CLEAR OUT INTERRUPTS 
001372 175316 07600 MOV DUTIS, ADUTIV 
175314 07700 CLR apUT M18. 
004230 07800 MOV :SET UP RETURN LOCATION 
000100 175262 97900 BIC SRINTEN. JRXCSR ;CLR INTERRUPT ENABLES 
000100 175262 8000 BIC RTXINTE,ATXCSR DITTO 
08200 ;END OF RECEIVER INTERRUPT SVC ROUTINE 
! 30 THE FOLLOWING S THE XHITTER INTERRUPT SVC ROUTINE 
001106 400 «4:°° DEC TEMPS OF SYNC CHARACTERS LEFT 
9gso0 BMI S$ 
003714 08600 MOV #1$, (SP) :SET UP RETURN LOCATION 
08700 si (LOAD SYNC CHARACTER AGAIN) 
004122 08900 S$: MOV #6$, (SP) SET UP RETURN LOCATION 
09100  ;END OF XMITTER INTERRUPT SVC ROUTINE 
o00025 175232 o9200 65: MOVB 25, aTXD ;LOAD CHARACTER 
000100 175222. 09300 BIC arxthre, JTXCSR CLR INTR ENABLE 
O011i2 09400 CLR 
09500 10%: CLR Re ;WAIT FOR INTERRUPT(RECEIVER) 
09600 INC Re 
09700 BNE a ;CONTINUE TO WAIT 
001112 09800 INC TEMPS 
000003 o01112 09900 CMP #3, TEMPS :DONE YET? 
10000 BGE 10$ 360 BACK,NOT YET 
000340 177776 10100 MOV #340, PS “PREVENT INTERRUPTS 
000100 175152 10200 BIC BRINTEN, ORXCSR :CLR INTR ENABLE 
001366 175156 10300 MOV DURIS,aOURIV  :RESTORE TRAPCATCHER 
175154 10400 CLR QDURI 
001372 175150 10500 MOV DUTIS. SDUTIV 
175146 10600 CLR aOUTIS 
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cP- 


003110 


177776 
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4$; 


as 
. 
‘ . 





2 
RXCSR, TEMPY 
BRXDORE, RO 


R 
Prec RXDONE> . RL 
RO,R1 

+4 


5 
#240,PS 





sRECEIVER INTR FAILED TO OCCUR 
:GET OUT OF TEST 


; CHARACTERS pie ve MATC 
SET UP FOR ERROR ISG 
tae RXDC 


AL 
SAVE ONLY RXDONE 


;FALSE INTERRUPT 
; INHIBIT INTERRUPTS 
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iz?’ D210D gy RHRRHR KRHA RRA RE REEL AREER ERE ERA RARER ES ELE EES EEE EE ESE E SES 







1555 oe00 ;; BAUD RATE TEST 
lei rr 









1273 02500 5p RRRRERERR RRA RHRRRE SR AE ES SLAF SRE AAA A RA LEL RRA L AREAL AES ELSE 
lex 

1281 35500 ge TEST DETERMINES THE BAUD RATE OF THE DFC USING 
le8e 02800 3A_KW11l-L/P AND DU/DP-11 AND PRINTS OUT THAT RATE. THE 
1283 02900 ;:TEST ALSO ee AN ERROR TYPEOUT IF THE BAUD RATE IS 
1eS4 03009 33 0FF BY MORE T 10%. 

1e85 03100 ;;MOQDE: _TOLE aN 

1286 | 03200 ;;LENGTH: EIGHT 

1287 03300 33 INES TEST USES wt TRANSMITTER AND RECEIVER LOGIC. 
Le88 03400 A SCOPE LOOP IS AVAILABLE BY USING SWITCH 14. 

1233 03500 i HOKE, SURE ates PROPER CONNECTOR IS INSTALLED! !!!!! SEE 





0 
1e96 O04274 012737 000340 177776 O4e00 START: MOV 









#340,PS : PREVENT INTERRUPTS 
1297 094302 Ole70& 001050 04300 MOV #STACK, SP :SET UP STA 

1298 994306 09905 04400  TXSETUP:RESET 

1299 994319 005037 001222 04500 CLR 

1300 504314 012737 17777? 001226 C4600 MOV CNT 

130: 004322 052777 600400 175030 04790 BIS enReSe TS JTXCSR ;MASTER RESET TRANSMITTER 

1302 004330 012777 Geb2S2 175020 o4e09 MOV 8026252; aPARCSR :LOAD THE MODE.WORD LENG 

1203 904336 900240 04990 NOP : PARITY SEN se ano SYNC RAARACTER 
1204 004340 9012777 oD004O0 175012 os000 MOV #40, JTXCSR ASSERT DNA 

1305 0043468 042777 O90Ci09 175004 905100 BIC #100, aTXCSR :CLR TX , 
1308 004354 112777 O002852 175000 05200 MOVE $252" STXDBUF : LOAD SINC CHAR INTO BUFFER 







1307 O04362 052777 O00lee 174762 OS300 RXSETUP:8IS #122, aRXCSR SET U UP RECEIVER 





1308 DON370 Oler7? O0S770 i7u7b& OS4OG § DUSETUP:MOV = ACNTX. QOURIV 

1303 004376 012777 000340 174762 905500 MOV JDURIS ; 

1310 904404 015777 006002 174756 05600 NOV NO. TRAP, SDUTIV ; FOR OU 

131, OONH1e Ole777 OOOO 174752 0570) Moy = 8340, aDUTIS INTERRUPTS 

1313 OO4420 904737 O0S4S6 05900 JSR PC, CLOCK :G0 CHECK FOR CLOCK 

1314 04424 905737 Odlele 06000 TST NO. CLOCK ? 

1315 O0443¢ 901002 06100 BNE = 18 :NO, CHECK IF SCOPE LOOP WANTED 
1316 04432 000137 o0S634 06200 IMP SWI4A 

1317 C4436 06300 18: 

1318 004436 104410 INSTR OUTPUT MESSAGE $ GET INPUT STRING 
1318 So4440 012600 MCPS iM 

1365 DOME 104412 SETFLG ;SET FLAG BASED UPON INPUT STRING 
1321 Oo4444 001214 CPSFLG STHIS F ; 

gee CO4W44E 105737 001214 0&400 TST8 CPSFLG "TEST FOR 50/60 CYCLES 

1323 OO44Se 001500 O6soo BEQ  NOBOCPS ;50 CYCLE MACHIN 

i3e4 OO4454 012737 OOO4sY 001224 06600 MOV  8300.,CLKSET SETUP FOR 60 CELE COUNT 

1325 004462 022737 177546 OOlel2 06700 KWSETUP:CMP al 77546, NO.CLOCK;FIND OUT WHICH 

1326 004470 001402 06800 BEQ KL sKULIL SETUP 

1327 04472 000137 oDss7e2 9650 JMP tiTB sku 1F SETUP 

1328 004476 012737 O045S2 o00100 67000 KWIIL: MOV ainTsvc #100 UP SERVICE ROUTINE 

1329 O64S04 012727 000340 000102 07100 MOV a#id2 P LEVEL 


ier ET U 
1330 904512 012737 177546 00j230 17 78e, CLKSTATUS rKWLLIL csr 
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17777 
vere 


000109 
76 


000005 


000200 
OO0lect 


001234 
000103 


000029 
004526 


001224 


004526 
090101 
OO4655 


000372 
004462 


Ol3ile 
O0leee 


013205 
COS634 
O0le2e 
013306 
013334 
005700 
013122 
001222 
013205 
005634 
001222 
013306 


013334 
005700 


5200, , @CLKSTATUS s SETUP FOR CLOCK INTERRUPT 


ATT FOR INTERRUPTS 
:SYNC UP KW AND DEVICE 


#200, JCLKSTATUS 
INTCNT ~ 

;FIRST T 
sDP 0 


: GRE WE DONE? 

*NO, CONTINUE TO TEST 
#101, 3CLKSTATUS 
BBOTAG, (SP) 


;50 CYCLE SETUF 


; CONPARE TO THIS LOW END 
‘TYPE THIS RATE 











;ALLOW INTERRUPTS 
















;100K 100 LONG-o-TIME OUT! #1! 
:CLEAR THE MONITOR 
: COUNT INTERRUPTS 

9 













OU 
YES, START OUTPUT OF DP 
‘KEEP GOING WITH TEST 
YES START OUTPUT OF DU 
:CONTINUE TO RUN TEST 
























;SHUT OFF CLOCK 
:GO DETERMINE BAUD RATE 













;COMPARE TO THIS HIGH END 
ANSWER IS TOG HIGH 


















;COMPARE TO THIS HIGH END 
SANSWER IS TOO HIGH 


{Sipe TO THIS LOW END 
YE his RATE | 
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104403 
000137 


OOS4S6 013746 
005462 


OOSYEE 
005474 





005634 
001222 


013306 


Boi zee 
013306 
pus 70 
013208 
005634 


177546 
177546 
oossse 
172540 
172540 
012506 


000006 
000004 


004552 


000135 


17-SEP-76 








000eS! 


005434 
000147 


000125 


009004 
000006 


OO0lele 
oooco4 


OO0lele 


000104 


173400 


16:06 PAGE 32 


118: 


128: 


138: 


14S: 





FOS 


SW14A 
CHCNT, #169. ;COMPARE TO THIS LOW END 


sNOT_H 
TYPE THIS RATE 


, MBAUDRT 
MRITE 

MAINPR 

#M150,13$ 
CHCNT, #103. ;COMPARE TO THIS HIGH END 

“ANSWER IS TOO HIGH 

PARONGRT 

CHCNT, #85. sCONPARE TO THIS LOW END 

, MBAUDRT :TYPE THIS RATE 

MRITE 
MAINPR 

, MWRONGRT sEITHER DEVICE DIDN'T TURN ON 
ale :OR COUNT WAS OFF BY MORE THAN 10 PERCENT 


;ROUTINE TO FIND OUT IF EITHER KW11-P OR 


:KWL1=L 


1$: 


2s: 


4$: 
3$: 


KWLIP: 


L EXIST. ENTERED BY "JSR PC,CLOCK" 
SESTETETESTCTECTESTSTTSTOS SSCS STS ST SCTE TTT TTT ETT TT 
K: MOV ae4, -(SP) :SETUP FOR INTERRUPTS 

MOV #6/-(5P) :IN THIS ROUTINE 

MOV #23. 284 :SETUP TO SEE IF KWLIP 
MOV #340, d%6 :PREVENT INTERRUPTS 
CLR NO. CLOCK 

: TST 38177546 sKWL1-L CSR 

- NOP ‘WAIT 
NOV . ,NO.CLOCK: THIS IS THE ONE 
MOV sSETUP TO CHECK KWLIP 
CMP #2, 08 tsp)+ sPOP STACK 
TST 3#172540 KW11-P ¢SR 
NOP WAIT 
HOV hake ,NO.CLOCK: THIS IS THE ONE 
TYPE NOCLOCK : THERE 1S. NO CLOCK 
CMP (Spee (SP}+ :POP ST 
MOV (SP)+; a86 RETURN RODRESSES 4 AND & TO NORMAL 
HOV (SP) +) aa4 DITTO 
MOV #INTSVC, 08104 sBETUP FOR INTSVC RTN 
MOV #340, 28106 PREVENT INTERRUPTS 
MOV #177777, dl7 sPRESET COUNT SET BUFFER 
MOV #172540, gn172542 
MOV #135, JCLKSTATUS 


sae INTER EN AND STATE 
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Og 
1538 006010 
39 90012 
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000137 


013172 


000001 


17-SEP-76 16:06 PAGE 33 


D04s25 
040000 


005704 


001216 
012535 


005634 
173326 


001234 
000103 
000020 
040000 


173264 


001222 
173354 


006012 


177570 


173410 


173430 
177570 


l J 
hee SWI4YA: BIT 


15200 TESTZ: 


INSTR 
MRBAUD 
SETFLG 
BRUDFLG 
15400 TSTB 
15500 BEQ 
15600 TYPE 
1570 HALT 
1$80 JMP 


15900  MAINPR: JMP 
16100 OUTPUT: TST 


6200 Q 
16300 BIS 

400 BR 
16506 = 2$: MOV 
‘16600 15: BIT 
16700 BNE 
16800 RESET 
16909 JMP 
17000 XXTABLE:M19200 
17100 M9600 
17209 M4800 
17300 M2400 
17400 M1200 
17500 M600 
17800 M300 
17700 M150 
17800 M7S 
17900 8=6CNT.RX: INC 
18000 TST 
18100 RTI 
18200 NO. TRAP:MOV 
18300 HLT 10 
18400 RTI 
18500 TRP.PC: .BLKW 1 





GO3 






BEGIN ;G0 START BAUD RATE CHECK 
¥B1 1h, SUR ;FIND QUT IF SCOPE LOOP IS WANTED 
OUTPUT ;RUN BAUD SCOPE LOOP 


SOQUTPUT MESSAGE 8 GET INPUT STRING 


:MESSA 
ie FLAG BASED UPON INPUT STRING 
BAUDFLG :WANT TO RUN BAUD TEST? 
MAINPR :NO 
, MSCOPBAUD 
ae ;WAIT FOR OPR TO PUT UP SW 14 
300.A  ; JUMP TO MAIN. PROGRAM 


IF DU GO TO DUI1.A,IF DP GO TO DP11.A 
TAG ;DP OR DU? 


23 :D 
#103, 3DPTS :START OUTPUT OF DP 
1$ :KEEP GOING WITH TEST 
#20, aTXCSR : TURN ON TRANSMITTER OF DU 
uBIT14, SWR “MAKE SURE SW 14 IS SET 
aD0.A ;GO RUN NORMAL TESTS 
:MESSAGE SETUPS 

DITTO 

sDITTO 

‘DITTO 

;DITT 

:DITTO 

DITTO 

Ret Ty 

:DITTO 
CHCNT :UPDATE COUNTER. 
@RXDBUF ?CLR RX DONE 
(SP), TRP.PC :IN CASE TX TURNS ON 


ERROR MESSAGE 








ZDFA-8 MACYL1 
2OFAB.P11 


006014 


2a 


0060 
096076 


Statist 


oO 

© 

o 
t= > +b b+ b+ be bb ps pp 
SLR PST NOR eS 


Stototataitat gts 
abet testo 


E 


006162 


ie) 
006224 


27( 732) 


Gaul 


patet a} 
OyINO 
oo 


OoOwWut) 


013737 


de 
013702 


010223 
005722 
010223 
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O01 076 
ozeo0 
15 70 


001175 
000001 


001156 
001144 


001156 


173232 
001144 


006240 
001350 


001322 


001174 
177000 
001144 


001346 


Ub be pb = pe 
“J 


;LINE.N SUBROUTINE TO FETCH THE LINE 


HO3 


; NUM MBER AND FIRST . VECTOR ADDRESS FROM 


weer 
: SWO-SW8=VECTO 


; RESS OF FIRST DP11 


;SW9-SWIS=LINE NUMBER OF DP11 SELECTED FOR TEST 


LINE.N: CLR 
MOV 


MOV 
HALT 


LINE.X: MOV 


A 
XTAG: ASR 


es: ADD 


ERRCNT 
SWR, SAVSR1 
SWR, RO 


SWR, SAVSRE 
SWR, RO 

Rl 
SAVSR2+1,R1 
#1,R1 

XTRG 
XLINEX,R21 
SAVSR1 


R1 
RI, XLINEX 
RI 

Ri 

R1 
JBASCSR 
SAVSRI 
#33, 084 

BACRSR, R2 

R1,Re | 
DPRS R3 

(R3)+ 

Re (Ra) 4 

Re, (R3)+ 

Re, (R3)+ 
(Re) + 

Re, (R3)+ 

Ro 

Ro, (R3)+ 

SAVSR2 Re 
atcc77?), R2 

SAYS 

2 

BASVEC, Re 
1,Re 

R2’ (R3)+ 
(Re) + 

Re (RQ)4 


;CLEAR ERROR COUNT 
SAVE CONSOL SWITCH SETTINGS 


j 967 SWR_TO LINE NUMBER 

; LOW ay! L = FIRST DP VECTOR 
:HIGH B ye = LING iiean si 
‘SAVE CONSOL SWITCH 


;SAVE LINE NUMBER 


;CLEAR LSB 


;SCALE LINE NUMBER TO ADDRESS 
sMODULO 10(8) 


;DOES LINE O REALLY EXIST?? 


;SET Re = LINE O ADDRESS 

: MANUFACTURE DEVICE ADDRESS 
:R3 = ADDRESS OF RCV STATUS RORS 
: LOAD oh STATUS ADRS 

INC TO RCV dae ADRS 
;LOAD_RCV BUFFER ADR 

:INC TQ SYNC BUFFER ADRS 
:LOAD_SYNC_AD 

31! NC _TO XMIT TUS ADRS 
L080 TRANSMITTER STATUS ADRS 


3 ESS 
;CLEAR LINE NUMBER FROM VEC ADRS 


:SET VECTOR ADDRESS TO LINE NUMBER 
;LCAD_RCV VECTOR ADRS 

iT NC_TO NEXT VECTOR 

;LOAD RCV PRIORITY ADRS 









103 
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i597 O0622e6 005722 0S700 TST (Re)+ ;INC TO NEXT VECTOR 
1598 006230 010223 0S800 MOV Re, (R3)+ sLOAD_XMIT VECTOR ADRS 


bad Bees Bidet 62600 mov STR) iUDGo nl PRIGRIY ORS 


1601 O00 000414 6 R S$ 
16 BOEStB Bo80 7? Q0115§ et 3$: RR XLINEX 
1603 O06244 013701 O0004e 06300 MOV aaa 


1604 
1605 O0062Se 000005 06500 T 
1606 <r QEEDD —_ 5 RHR ARAKA KHER KARE AAA R EK EEK A ARRAS LAER 


1607 06700 :DP11 LOGICAL ENDING 
06800 Perrritiiitiiititiititittitititiiiiitittity) 


1608 
1609 006254 904711 06300 JSR PC,(R1) 
000240 NOP 


611 

ble 7 N 

613 022626 07300 4S: POP. SP 

614 006266 000876 07400 BR INE. 

615 0062e70 012737 oO00006 op0004 O7500 SS: MOV #6, 84 

616 006276 013737 001322 001210 07600 MOV DPRS, DEVICE ;SET FOR END PASS MSG. 

617 006304 000207 07706 RTS PC 

pte Benn 5 RRR HRRK EE RK EAR RKERERCL RVEC HERA REE E RRR EERE RE RERERRE REE 

1620 98000 ;CLRVEC,ROUTINE TO FILL COMMUNICATION VECTOR AREA WITH .+2,HALT 

G22 006306 O12702 000300 C8200  CLRVEC: MOV #300, Re ;R2 COMM VECTOR AREA ADRS 
1623 006312 012701 000302 08300 MOV #302/R1 :INIT RL WITH ADRS OF HALT 
1624 006316 010122 08400 «1S: MOV Rl, (Re)+ “MOV .+2 TO PC 

625 006320 o0S022 08500 CLR (R2)+ :MOV HALT TO PC 

1626 O06322 O22121 08600 CMP (R1)+, (RL)+ :INC TO NEXT VECTOR AREA 
1627 006304 022701 000776 98700 CMP —ss«#776, RL :END OF VECTOR AREA 

1628 006330 001372 08800 BNE 1$ ; 


NO 
16s 006332 000207 08300 RTS PC ; RETURN 


1632 
1633 OSS0D 9 «—«-_-_4g HEAXKHAKAKALALALKAXA OK ADR ALKA AK AK AKA KAKA EL EAHA ER ERA EERE 
a4 Heat : OKADR, ROUTINE TO CHECK FOR VALID DU ADDRESS 


636 006334 013746 000004 09600 OKADR: MOV a#4,-(SP) fA 4 FOR INTERRUPTS 

637 006340 013746 000006 09700 MOV 46, me 

1638 O06344 012737 006370 O000004 09800 MOV : SET TUP TO CHECK ADDR YOU SELECTED 
639 006352 012737 000340 000006 09900 MOV tit a6 ;PREVENT INTERRUPTS 

1640 006360 005777 000704 10000 TST JDUBASE s ADDRESS 


006366 0004 BR ;ADDRESS OK 
1643 006370 104403 012773 10300 18: TYPE MNODEV ADDRESS NG--LET OPR KNOW 

1644 006374 Oe2b26 10400 CMP (SP)+, (SP)+ :POP_STACK 

1645 006376 000000 10500 HALT :WAIT FOR OPR TO DECIDE IF ADR IS x. 

1646 006400 000777 10600 BR . IF ADDRS WAS OK THEN RUN DU DIAGNO 

1647 10700 :IF_ADRS WRONG RESTART TEST AND ANS SduesTroNs 
1648 CO06402 012637 000006 10800 86S: MOV 6 RETURN ADDRESS 4 AND 6 TO NORMAL 

1649 006406 012637 000004 10900 MOV 4 DITTO 

1650 O0641le 000207 
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+. 


SPOWER FAIL ROUTINE 
oped 22 pe tect ooode4 .PFAIL: MOV. © #PMRUP, 24 ;LOAD PFAIL VECTOR FOR POWER UP 
u22 O05050 HALT 


PWRUP: RESET WAIT TTY_TO “ UP 
MOV #STACK, SP sREINIT STACK POINTER 
000024 MOV #.PFAIL, 24 LOAD PFAIL VECTOR FOR POWER ‘DOWN 


000177 - JMP —s APSTART 


SEQ. DATA: 
012737 001204 0 MOV #6$, BACK 
1050 aSEXT ;CLEAR SYNC EXTENTION 
RO “RECEIVER DAT 
; TRANSMITTER bare 
"RECEIVER STATU 
DPTS ; TRANSMITTER STATUS 
172612 #BITO, JDPRS 


: STRIP SYNC 
001166 #400, CHLEN :CHAR LENGTH INDEX 
001144 sB1TQ, SAVSRI TEST 12 BIT CHAR MODE 


4 0 
001170 #10000,LIMIT >SELECT END OF DATA 
172560 481719, JOPRS SELECT 12 BITS/CHARACTER 
001154 TSYNC SYNC FOR T CHAR 
seeet :PLACE mse. OF SYNC IN SYNC EXT 


001170 : wi00 LIMIT ; TEMPORARY CHARACTER LIMIT 
sivla> aDPTIV 


#RV18. IDPRIV 
#200 pS 


SCNT 
teyne SYNC : YN 
#BIT6; JDPRS :RCV INT ENB 


30 O52 
Q0663& 052777 000301 172464 #301, 20PTS 
: TRANS INT ENB 
TRANS DONE 


006644 005237 001102 
0 0013 
001104 


0056 104000 
O0666e 000207 


O06664 013777 OO11S54 172440 : OV TSYNC, JOPTB XMIT SYNC 
001155 172434 M TSYNCH, QSEXT LOAD SYNC EXT 
001172 D SCNT ;HAVE 2 SYNC’S BEEN XMITED 


1$ 
006716 172426 #TV19,QDPTIV ‘YES CHANGE VECTOR 









KO3 
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1709 006714 000002 16900 = 18: RTI 

1710 17000 

on 17100 ;SEQUENTIAL DATA TRANSMITTION ROUTINE 

1713 1oa0e 

1714 006716 O32777 140000 172404 17 TV19: BIT #140000,dDPTS ;ANY STATUS ERRORS 

1715 006724 001401 17500 BEQ +4 :N 

1716 006726 104000 17600 HLT :REPORT ERROR 

1717 006730 105777 172374 17700 TSTB aDPTS ; TRANSMITTER READY 

1718 006734 10040 17800 BMI +4 

1719 006736 1040 17900 HLT t REPORT ERROR 

1720 006740 913777 OO01i62 172364 18000 MOV TDATA, JDPTB ;LOAD rd, 

1721 O06746 005237 O0116e 18100 INC TDATA :NEXT CHARACTER 

I7ee O067S2 Oe3737 001170 001162 18200 CMP LIMIT, TDATA HAVE ALL CHARACTERS 
1723 006760 001003 18300 BNE 1$ :NO 
1724 O06762 O4e777 000140 172340 18400 BIC #140, aDPTS YES, CLEAR INTERRUPTS - 






17eS 006770 g0000e 18500 «1S: RTI 
1727 18700 ;RECEIVE SEQUENTIAL DATA 


















1728 19800 

17e9 006772 105777 172324 18900 RV18: TSTB dDPRS ;RECEVIER DONE?? 
1730 006776 100401 19000 BMI +4 :Y 

1731 007000 104000 19100 HLT ;REPORT ERROR 
1732 007002 013700 001164 19200 MOV plead . 

1733 007006 017701 17e3le 19300 MOV JDPR 

1734 O070le 023777 001164 172304 19400 CMP RDATA’ AOPRE ;CORRECT DATA 
1735 007020 001404 19500 BEQ 

1736 OO070e2 017737 172276 001146 19600 MOV @DPRB, TMPDAT ;STORE DATA 

1737 007030 104001 19700 HLT 1 REPORT ERROR 
1738 007032 O42777 O00001 172262 19800 18: BIC #B1TO, JDPRS ; CLEAR stRIP SYNC 
1739 007040 005237 001164 19900 INC RDATA NEXT CHARACTER 
1740 007044 023737 001170 001164 20000 CMP LIMIT,RDATA 

1741 Q0070S2 001037 20100 BNE 3$ 






1742 007054 005037 001164 20200 CLR RDATA 












1743 007060 005037 001162 20300 CLR TDATA 

1744 007064 006237 001170 20400 ASR LIMIT , ;DECREASE LIMIT TO 7 BITS 
1745 007070 Ole777 OO66E4 172244 20500 MOV #TV18,dDPTIV :SET UP ove ieee 
17468 007076 012737 OO90004 001172 20600 MOV #4 4 SCNT s SYNC COUNT 

1747 097104 052777 O00001 172210 20700 BIS #BiTO, DPRS ;STRIP SYNC 

1748 O071i2 042777 OO4000 172202 20800 BIC sBITll SDPRS CLEAR RCV ACTIVE 

1749 007120 0S2777 000301 172202 20900 BIS #301, JOPTS 

1750 O071e6 053777 O01166 172166 21000 BIS CHER. JDPRS ;CHANGE CHAR oe 

1751 por ia pes? 7 aai00 001166 21100 ADD #400, CHLEN DECREASE CHAR LENG 

17Se2 7142 737 O01400 001166 ele00 2S: CMP #1400, CHLEN HAVE ALL LENGTHS BEEN TESTED 
1753 907150 001401 21300 BEQ 4$ ; syES 

1754 0071Se 000002 el400 86-3: RTI NO 

1755 007154 005077 172150 elSOO 4S: CLR aDPTS sCLR ae ee STATUS 
1756 007160 005077 172136 21600 CLR dDPRS :CLR TECEIVER STATUS 

1757 007164 042737 OO00040 177776 21700 BIC #BITS,PS ;PRIORITY = 4 

1758 007172 013716 001204 21800 MOV BACK, {SP) 

1759 007176 o00002 21900 


RTI 
;NFW DU ADDRESSES 






1761 007200 013737 007270 001352 22100 DUADDR: Mo DUBASE , RXCSR ; XXXO 
1762 007206 013737 001352 001210 22200 MOV “6 ot DEVICE 
1763 007214 062737 000002 007270 22300 ADD 






1764 007222 013737 007270 001354 22400 MOV DUBASE. RXDBUF ;XXX2 





LOS 
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007230 013737 007270 901356 22500 woe s XXX2 
pe OUERSE, TXCSR XXX 
SoeRSe, TXDBUF § ;XXX6 


Be Bike 


RT 
007270 000000 DUBASE: 0 


; THE FOLLOWING CALCULATES THE NEXT DEVICE ADDRESS AND ASSOCIATED 
VECTOR ADDRESSES IF RUNNING MULTIPLE DEVICES (DU11...0FC11’S) 


007272 105737 001250 DU.UPOATE: | TSTB  MULTD me ves RUNNING MULTIPLE DEVICES ? 
001264 ACTREG sare ANY DEVICES ACTIVE ? 


RUNIT 37 
012113 MCOW no 
001264 ACTREG, RO :DISPLAY ACTREG 
: SELECT SOMETHING TO RUN @ ACTREC: 
. SWITCHES & HIT CONTINUE (P = 
001642 SMP DULL ; START OVER "Aen YOU DESELECTED EVERYTHING 
000010 o01252 : #10, BASEADD x S) 
000010 001260 ZERO: ; #10; BASEIV NEXT BLOCK (VECTORS) 


L 
001266 ROTADD ;UP DATE ROTATING POINTER 
007346 103412 2$ S IT THE LAST DEV ICE 
10 BE TESTED IN THIS PASS ? 
007350 033737 OOl266 001264 ROTADD, ACTREG sTEST THIS DEVICE FOR ACTIVE STATUS 
001762 RUNIT IF NOT ACTIVE, TRY NEXT ADDRESS 
007424 PC, REPLAY ;CALCULATE NEW’ PARAMETERS 
OKADR ;CHECK FOR GOOD ADDRESS 
Brest TRT YES IT WAS ACTIVE TEST THIS DEVICE 
012737 O00001 oDdl266 : “te ROTADD :OK! NOW SET UP ROTATING 
*POINTER FOR NEXT MULTIPLE PASS 
013737 001254 o01252 KEEPADD BASEADD RESTORE BASE ADDRESS 
001262 001260 26000 PIV, BASE RESTORE BASE INTERRUPT VECTORS 
007424 Ke a: PLAY :CALC NEW PARAMETERS 
BR cc : JUMP AROUND AY 
007270 REPLAY: BASEADD DUBASE :SET UP FOR NEW ADDRESSES 
JS C, DUADOR “CREATE NEW ADDRESSES 
001364 BASE TV DURIV :CREATE DURIV 
#2, BASEIV 
BASELV DURIS § ; CREATE DURIS 


V 
gaeev UTI ;CREATE DUTIV 
BaeeTy DUTIS § ;CREATE DUTIS 
001364 001260 DURIV,BASEIV § :RESTORE 
000207 PC 


CCC: 
013701 ooo042 a#42,R1 :CHECK FOR ACT-11 OR DOP 
ARESTRT :IF NOT, CONTINUE TESTING 


007530 LOGICAL: JSF PC, (RL) 


Ow NOU LW ODS Vee 





DZDFA-B MACY11 271732) 
z -Pll 


007532 


007622 


000177 
017637 


005037 
162737 


000000 
062737 


rei 


000177 








000340 177776 
171434 


000000 
000002 
001110 
177776 
001106 
001106 


000001 
171262 
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#340,PS ;PREVENT INTERRUPTS (PRIO: 7) 


;FOR A SMALLER DELAY TIME 


LAY TIME 
T A NUMBER IN HERE TO BE ADDED 
jToral TINE. 





DZDFA-B MACY1! 
OZDFAB.P11 


1845 007626 


1861 90077 
1862 007730 
1863 0077 


3e 
1864 007734 


1866 

1867 

1868 

1869 

1870 

1871 

1872 

1873 007736 
1874 007742 
875 007746 
1876 0077 
1877 007754 
1878 00 
1879 007760 
1880 007762 
1881 007766 
1882 007770 
1883 007774 
1884 010002 
1885 010006 
1886 010010 
1887 010014 
1888 010020 
1889 010022 
1899 010024 
1891 

1892 

1893 

1894 0026 


27(732) 


032737 


000432 


005037 
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040000 


171204 
171200 
004000 


001070 
001070 


001242 
001070 
000062 
001062 
001060 


001100 
001242 
001974 


001144 
001156 
001074 
001234 


007272 
171166 


002 


001000 
001064 


177570 


177570 


001966 


177570 


177570 


. SCOPE: 
TTST: 


BRW: 
BRX: 


EOP: 


RESTRT: 


XCSR: 


. SCOP 1: 


1$: 





NO3. 


;SCOPE LOOP AND INTERATION HANDLER 


ero #BIT14, SWR 
TSTB = ATKCSR 

BPL 3: 

HOV TKDBR, RO 

BIT #SW11, SWR. 

BNE 2 

INC LPCNT 

CMP LPCNT, ICOUNT 

BNE $ 

CLRB = ERRFLG 

CLR LPCNT 

MOV #50. , ICOUNT 

MOV NEXT? RETURN 

MOV RETURN, (SP) 

RTI 

1407 

432 

76ND OF PASS 

YPE “END OF pass CSR: XXXXXX" 
; UPDATE PASS COUNT 
UPDATE LINE NUMBER 

iF IN CYCLE MODE 

RESTART TEST 
CLR LSTERR :CLEAR LAST ERROR PC 
CLRB = ERRFLG :CLEAR ERROR FLA 
INC PASCNT ‘UPDATE PASS COUNT 
MEPASS 
CNVRT 
XCSR 
TSTB  —« SAVSR1 
BMI +6 

INC XLINEX 
MOV PASCNT, LIGHTS DISPLAY PASS COUNT 
TST TAG :DP OR DU 
BNE RESTRT :DP 
IMP DU. UPDATE : DU 
INP aJCONT . :CONTINUE TO TEST APPRO. DEVICE 
.BYTE 6,2 
DEVICE 

:CHECK FOR FREEZE ON CURRENT DATA 
BIT #SW09, SWR 


MOV _—LOCK, (SP) 
RTI 


Ty 
wee 


1898 


ONOAIOIOOOO00VRH0 


o-- 6 -- 0 -- b-- 0 = B= 6 -~< b = = 9 -- p- 


6 


O.0.0000 0.0.00 
0 0-2 b+ b= B20 bo bo he he 
WO NIOULS Gotur-Ow 


BES 


CRUE 


QNIADIVOOOVGOOVVOOVOOOVWOOOOONIDIOOVOVWVAOOAOOHVOV000000 


0— 0 = &- 2 = b+ 6 — b-2 b&b OO = 0 8 8-2 8 0-0 0 0-2 & 2 2 = = = -- B+ BD 2-2 Bo 


het 


BBS prt 


PPE 
GIT 


+ 2 b= be b 2 + 0 2 0-2 bo ho he b+ 2 + he & = he B+ 0 0 0 Be ho hho he = bBo b= Bo + hs ho fo he o~ 
.O #0 
y 4 ’ 


£ 


FR-8 
AB 


wee? 


© 
© 
£ 
£ 


uw 
Oo 


State} 
£ 


7BBBRE 
Phe 23S 


aonogd 
b-0--() 


OVVIVIOVOVOVIVIOIOOVOOONO 
0 0+ b= > = 0—- b= 0 bo bb 2 b= 62 ho bo 0 he 


PRA ON IST Raa Re Seve 


fororofurororore 


forofo 
ES 


MACYLL 270732) 
ll 


-furu~s 
ons 
~ Rin rah 
NOmonio 


009009 
005737 
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i77570 


177576 


O01242 
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; TELETYPE OUTPUT ROUTINE 


;ERROR HANDLER 


“4m 
<x 









ZOFAB 

1959 01027 001402 

i955 910300 104403 

1956 010302 00000 

taee BIBRYG Bbr4sa O15" 
1959 010312 104408 

1960 019318 | So009 

1961 Q1088 10N0S 
1962 910320 005737 177570 
1863 010324 100005 

1364 010386 O10046 

1965 010330 316600 oo0002 
1966 910334 900000 

196? 010336 012600 

1968 010340 005237 001076 
1988 010344 032737 090400 
1970 910352 901007 

i871 910359 032737 oo2000 
1972 010362 Oo14d7 
i873 010364 013737 “o0i062 
1874 Q10372 012706 901050 
1875 010376 000177 170956 
1976 O104%02 900002 

1977 O10404 ocdo0! 

1978 910406 — 006 O02 
1973 G1041C 01142 


1988 
1983 10412 104403 
1984 O10414 011473 
1685 O194i6 017601 oo0000 
1986 10422 013737 013756 
1987 10430 062716 00002 
198 010434 012137 10604 
1988 10440 112137 9010606 
1386 10444 112137 010607 
194] O10450 013137 010610 
1882 010454 013704 010610 
1993 010460 113705 010606 
1994 019464 013700 (.3756 
i995 010470 910403 
1996 10472 042703 177770 
1987 010476 062703 O00260 
i988 910502 11 
1999 010504 o00241 
2000 010506 
2001 010510 oode4 
2002 010512 906004 
| 2003 O10514 goo0e4: 
2004 010516 o4 
2005 010520 005205 
2006 10522 001362 
2007 10524 012703 o14020 
2008 010530 114923 : 
2009 Ol 105337 010606 
L 





001060 


001106 
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DATAHD: 
TYPDAT: 5 T 


RESREG: RESOS 
HALTS: 


EXITER: INC 


1$: MOV 
MP 

2s: . 

ERTABO: 1 


.CONVR: TYPE 
.CNVRT: MOV 


1$: MOVB 
2s: MOV 


33: MOV 


4$: MOVE 


CO4 







TYPDAT 


PERE G 





WR 
ExITER 
2(SP.,RO 





ERRCNT ~ 
sSWCS, SWR 


1$ 
#SW10,SWR 
NEXT, RETURN 
aSTACK, SP 
JRETURN 









6,2 





RY 
#1?7770,R3 
#260,R3 
R3, (RO)+ 


RY 


WMDATA,R3 
-(RO), (R3)+ 
CHRCNT 








DIOFA-8 Ahlen 271732) 


DZOFAB.P 
2019 010536 
2011 o10S40 
2012 ate 
Saig Bibeds 
2015 Q10S56 
2916 010560 
e017 o10Sse 
2018 O10564 
2019 Ql 
e020 901057 
e0e1 Ql 
2022 010692 
2ef2e3 910604 
O24 010606 
2025 ‘ 
2026 0:5610 
2027 
2028 
2523 
2030 oOl0sle 
2031 
2032 
2033 
2034 919620 
20235 0106e4 
2036 010630 
2037 010634 
2038 019840 
2033 O:0s44 
2040 010650 
2041 
2042 
2043 
2044 010652 
2045 O10656 
2046 O10&be 
2047 O10&66 
2948 01067e 
2049 010675 
2050 019702 
2051 
e052 
20S3 
2054 910704 
2055 010706 
20S& 010712 
20S7 010716 
2058 010722 
2089 010726 
2060 010732 
2061 010734 
20 010736 
2063 019742 
2064 O10746 
e065 910750 


000000 


016637 


1e1427 
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010697 


tes 


010604 
001106 


01406 
00001 


000060 


013756 


00114e 
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S$: 


$$: 


WROCNT: 


DO4 


BNE at 

TSTB SPACNT 

i at R24 
BOE BEAR ARS) 
BNE S$ 

CLRB (3) 

TYPE 

MDATA 

DEC WROCNT 

BNE 

nov TEMP3, TEMP 


R 
0 


CHRCNT: OQ 
SPACNT=CHRCNT+1 
BINWRD: O 


. SAVOS: 


SvoS: 


-RESOS: 


-PARAM: 


PARAM: 


1$: 


/SAVE PC OF TEST THAT FAILED AND RO-RS 


MOV 4(SP) , SAVPC 
;SAVE RO-RS 
mov RS, SAVRS 


MOV RO. SAVRO 


;RESTORE RO-RS 
MOV SAVRO, RO 
MOV 


;CONVERT ASCII STRING TO OCTAL 


MOV to RS _ ;PUT wea + Wl oe SP INTO RS 
;PUT LOW LIMIT INTO LOLIM 


MOV ° 5)+,Locmm 
MOY (Rede CEN 
MOV (RS)+,DEVADR 
MOVB (RS)+,LOBITS 
MOVB (RS) +, ADRCNT 
MOV (§ SP) 

CLR fe’ 

MOV #INBUF RY 


E Py 
CMPB (RY), 860 


: PUT 
RESTORE NRETURN ADDR aN STACK FOR RTI 


;CR ? 
sYOU TYPED 
sLOW LIMIT 


CR 
ASC 


TQ 
8 


Q SOON ! 
Q 


















DZOFAB.P11 

S ae 
S082 8185 
2069 010764 
2070 919770 
2071 Q1077e 
e072 910775 
e073 011000 
2075 911004 
2076 011006 
env? 011010 
2.78 0110ie 
2079 
2080 


e082 011014 
2083 9011020 
ecs4 011022 
2085 011026 
2086 011030 
0110 

2088 

2089 


2091 911036 
2082 O11042 
2093 O11044 
2994 011050 
2095 011054 
20% 011056 
2097 911060 
2098 011062 
2099 O11064 
2100 O11066 
2101 

2102 

2103 

2104 

2105 911070 
2106 O11076 
2107 O11102 
2108 O11104 
2109 011106 
2110 Oliiie 
21i1 Olille 
2112 O11122 
2113 O11184 
2114 11130 
21i5 O11134 
2116 O11140 
2117 o11142 
2118 O11146 
2119 O111s0 
2120 O11156 
2121 Oli160 


| 


Tika MACYLL 271732) 


00 
011087 


017637 
O62 
194403 
00 


00135& 


00087 - 
000060 - 
oo0015 


011062 
011060 
911066 


011064 


000002 
011067 


000000 011104 
o0008e 


167706 
167676 167700 
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NPB (RY). #67 sHIGH LIMIT ASCII 7 


BICB #60, (RY) sCONVERT TO OCTAL 
8ISB = (R434. RS ; STORE AWAY ITS AN OK CHAR 
CMPB saw, (RY) :R ? 
BEQ LtMtTs :NOW CHECK FOR HIGH BLOW LIMIT CONDS 
ASL RS ‘ALLOCATE ROOM FOR NEXT CHAR 
ASL RS 
ASL RS 
BR 1$ 
PARERR: INSTER RETRY 
BR PARAM! 


;TEST TO SEE IF NUMBER IS WITHIN LIMITS 
LIMITS: CMP RS, HILIM 


BHI PARERR :THE # IS TOO HIGH 
CMP RS, LOLIM 

BLO PARERR :THE # IS TOO LOW 
BITB LOBTTS,RS :TEST BY MASKINGTHE # 


;STORE NUMBER AT SPECIFIED ADDRESS 


MOV DEVADR RY :GET STARTING ADDR OF 

13: HOV (R4}+ :STORE AT THIS ADDR 
DECB ae sHOW MANY TIMES + 2 ” 
BNE 1$ 
RTI 

LOLIM: 0 

HILIM: 0 
DEVADR: O 


LOBITS: O 
ADRCNT=LOBITS+1 
;ASCIZ STRING INPUT ROUTINE 


INSTR: MOV 3(SP), .MSG PICK UP MESSAGE 
ADD #2, (SP) : JUMP AROUND MESSAGE FOR ATI 
“INSTI: TYPE 
a SINBUF , RY :GET STARTING LOC OF INBUF 
MOV #7, R3 :MAX & OF CHARS 
1$: ISTB aTKCSR ITTY FLAG 
MOVB  @TKDBR, (RY) ; TAKE CHAR 
BICB 8200, (RY) ; 
CMPB (Ra) #15 :CHECK FOR CR 
BEQ INSTR 
2S: S18 JTPCSR sTEST FLAG 
MOVB  aTKDBR,3TPOBR  ;ECHO CHARACTER 
DEC Re :DID YOU TYPE TOO MANY CHARS ? 









ll 

2l22e O11162 

2le3. 011164 

2124 011166 

318 011170 

2i28 

eleg 

2130 

213} 

else Olll7e 

2133 011176 

2134 011204 

2135 011206 

2136 011210 

e137? Olle2le 

2138 Olle 

2133 Olleee 

2140 Oll226 

2141 Qlle232 

2i4e 011234 

2143 011236 

2144 011240 

2145 O11244 

2146 O1le%6 

2147 911252 

2148 011260 

21438 O11264 

2150 

2151 

e152 

21S3 

2is4 

2isS Cl1266 

2156 011270 

2i1S7 011274 

2158 011300 

21S3 011302 

2160 011306 

2161 Oll3ie 

elée OLISIE 

2163 

2164 

21&5 

2166 

2167 

2168 

2169 

2170 011320 
011345 
011372 
011410 
011433 
011447 
O1L14SE 
011473 


ZOFA-8 NACYLL 
O2DFAR.P : 


nooo: 


005015 
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000000 
000116 


000131 


177777 
goco0e 


167604 


167600 
001062 
001060 


oc00de 
ococo0 


177001 
001270 
000000 


000012 


014062 


014062 


001960 


047S2e 





FO4 


. INSTE: Min 


QM 3? 
BR . INSTI ;RETRY 
INSTRe: RTI 


;COMPARE THE FIRST ees ee _ v., TELETYFE INPUT 
BUFFER TO THE CHARACTERS "N” AND “ 

IF THE CHARACTER IS “N™ CLEAR THE FLAG 

IF THE CHARACTER IS “Y" SET THE FLAG 


. SETFLG: MOV a(SP),RS 


CMPB ss #’'N, INBUF sIS IT. "N" ? 
BNE t 
CLRB = (RS) :000 
BR § ST 
1S: CMP #°Y, INBUF -IS IT “y".? 
MOVB  #-1, (RS) :377 
23: a00 #2, (SP) 
3$: INSTER : RETRY 
R .SETFLG 
.SCOP2: TSTB  aTKCSR 
BPL 3 
TST atk 
MOV fet OR TURN 
38: MOV TURN, (SP) 


RTI 
; TRAP DISPATCH SERVICE 
ARGUMENT OF TRAP IS EXTRACTED 
;AND USED AS OFFSET TO OBTAIN POINTER 
:T0 SELECTED SUBROUTINE 


.TRPSR: MOV (SP) ,-<SP) sGET PC OF RETURN 
- SUB #2, (SP) :=PC OF 
_ MOV a(SP), (SP) ; GET ope 
TRPOK: ASL (SP) MULT IPLY TRAP ARG BY 2 
BIC #177001, (SP) ‘CLEAR UNWANTED BITS 
ADD #. TRPTAB, (SP) POINTER He SUBROUTINE ADDRESS 
MOV J(SP), (SP) :SUBROUTINE ADDRESS 
IMP aSP)+ :GO TO SUSROUTINE 
ERE 
‘TTY MESSAGES 
eererttitit ttt 


EDP11: .ASCIZ <15><l2>?DPLI/DFC11-A TEST ” 
EDUL1: .ASCIZ <15><l2>?DULI/DFCII-A TEST ?° 
MPOWER: .ASCIZ <15><12>/PWR FAILED / 

MEPASS: .AS 7247) 18) (12) END pass CSR: / 
MTSTN: . 159<12)/TEST NO. 
LINE: 

1S> C12) “ERROR PC: / 
1S>< 12> 









GO4 
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005015 d420le 053105 DUTITLE: .ASCII DLL DINER Cie — TEST-DUL1 8DFC1IA 7<15><1l2> 
042115 0 0 / Mp 11-D it the cig 
01 OPTITLE: (1 Bows 8y EVI iE) 4 le), TEST-DP11 8DFCLIA 7<15><12> 


MVECTO: . 
MREGAD: :ASC 


DD D- 

WWDW 

OONnD 
od 


oO 
4 4 4 O—-4 4 b—4 4 4 4 0-4 4 Ce 


AoBR ESS-/ 

le>/1ST er RECEIVER CONTROL REGISTER es say 
12>/ARE_YOU RUNNING MULTIPLE DEVICE (Y OR 

13) 881 DEVICE: RECEIVER CONTROL REGISTER ADDRESS-/ 

(12>/_.,.SELECT SOMETHING TO RUN dACTRE 

<2) /0uT OF RANGE: RETYPE LAST DEVICE RXCSA ADDRESS-/ 


<15><12>/R / 


(15><12>/REG. ADDRESS / 

To) (1g) 7 TRANSAT TTER / 

<«15><12>/RECEIVER 

C18) (139 “UNEXPECTED INTERRUPT / 

JEXPECTED  RECEI ‘ey / 

/FAILED TO INTERUPT 

: . /INTERUPTED UNEXPECTEDLY. / 

DH3: A C152 <1) “TRAPPED FROM 

MNOCLOCK: ASCII CIE) (12> /SYSTEM HAS NO CLOCK!!/ 

MSCOPBALD: "ASCIZ <15)><12>/PuT UP tS i. FOR SCOPE LOOP / 

MCPS: A ¢15><12>/I§ THE AC LINE INPUT 60 CYCLES? (Y OR N) --- 
€15><12>7D0 YOU STILL WISH +9 RUN BAUD TEST USING SCOPE Loop? ¢ 
AT el ai IS NO” DEVICE PRESENT AT THE ADDRESS YOU SELECTED- 


DDUHMDYDDYD 
WMWWWw 


D 
ww 
ONNONOOO 


020122 
051012 


oO 
NININININININGND NNNNNNNNINRIS 


w 
OQONONN0NND 


»D 
mw 


C 
C 
C 
C 
Cc 
C 
C 
C 
C 
C 
¢ 
Sc 


IZ 
IZ 
IZ 
12 
1Z 
12 
IZ 
12 
IZ 
IZ 
IZ 
IZ 


M7S: A 
MWRONGRT: 
DRT: -ASCIZ 
MRITE: .ASCIZ 7 BAUD. 
oor 7ASCIZ<15)<12>7D0 YOU WISH TO CHECK BAUD RATE? (Y OR N) --- / 
4412 ASCIZ <15><1l2>/YOU TOOK TOO LONG TO SCOPE OR DFC PAILED TEST. / 
O4e0le 020117 09100 Mee TeST: "ASCIZ <15><12>/00 YOU WANT TO RUN BAUD RATE TEST? (Y OR N) --- ¢. 


- EVEN 
-ERRTAB: 


013720 
012255 
012363 
013732 


012276 


rururururvrururorurururu 
COW III ING 








AB.Pil 
2183 O13656 012407 
ts 013660 000000 
2186 Q136$2 Qle3 
2187 Biseed Bisage 
tt 013666 000000 
2190 013670 Olee7s 
2191 O1367e 012434 
ste 013674 900000 
€194 013676 Jle3ib 
219S O13700 O12e434 
Tt 013702 000000 
2198 013704 011473 
2199 013706 013465 
sou 013710 000000 
2202 913712 012333 
e203 Braria 01¢c466 
2204 013716 013750 
2ee0S 013720 000002 
2208 013722 oo 
2207 013724 001124 
2208 0137c6 
ssa 013730 001126 
g€ell 013732 900003 
2ele 013734 
2213 013736 001110 
2214 013740 
2215 OQi374e 001124 
2216 013744 
2217 013746 O011e6 
2218 

19 013750 000001 
e220 0137Se 00 
eel 013754 O0601e 
eeee 013756 000000 
eee3 014020 
eze4 014020 000000 
ee 014062 
eee& 014062 000000 
eee? 014124 


e228 000001 


———- ve 


004 
002 


010 
004 
002 


002 
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DZDFAB.P11 CROSS REFERENCE TABLE -- USER SYMBOLS 


aga O02046 821 829% 
ACTREG 609 874% 881* 
ADRCNT= 
STR 
BACK 
BaSCSR 
BASEAD 879 esx 887% 1786% 175 .. 1803 
1800* 1805 1806* 1807 1808* 1809 


1507 1508 


MNfwrre-O 


4-4-4 4 IH 4 


Sornunsone oe emo 


B 
B 
B 
B 
B 
B 
B 
B 
B 
B 
B 
B 
B 
8 
B 
B 
B 
B 
B 


“O44 4-4 1410 4-14-44 4 74 


O44 44 


1453 1457 


ss TU b— bs be be te 
WwW 


1358% 
1497% 1498% 


1959 
CON.RX 003004 1022 


1810% 


1811 


1366 1375 1379 1388 1392. 1401 
1533# 


18124 


1405 


1414 
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DZDFAB.P11 CROSS REFERENCE TABLE -- USER SYMBOLS 


CPSFLG 001214 1321 
CTS 0 1 
19608 


1513 


1762% 


1673% 1675% {680%  1691% 1738% 


1761 1767 
001366 743% 1119% l2l2e 


001364 851 l2il* 


004370 
1214% 1311% 


1229% 
1785 


EEE 04620 
EIGHT = 006000 
EM! OleesS 
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CROSS REFERENCE TABLE -- USER SYMBOLS 


OZOFA- “y MACYLL 27i7 








2182 2190 

2186 2194 

ee 1x 548% 1968% 

19253 Bede 13385 1388 1950 








os 
761% 779 781% 816 819% 





782 830 842 8Se 863 888 898 1011 1032 1318 1504 
1000 1300% 1341% 1350 
1494 












759% Biles 1854* 1855 1859% 


1924% 
1372 1385 1398 1411 1424 1437 1450 1463 1509 15138 
1381 1394 1407 1420 1433 ahs 1459 21708 


95 21708 
21708 
1319 2170% 
1984 e170% 2174 2198 
2018 eects 
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DZDFAB.P11 
MEPASS 011410 


001540 
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20 
774 


2170% 
21708 


2066 
777% 


B44 
1075% 


2068 
795 


1165 
1410 


1777 
1403 


936% 


1325 


865 
1166% 


2077% 


1167 
1423 


1416 


939% 


1478 


890 
1169% 


2083 


1301 
1436 


1429 


1070% 


1481% 


1302% 


2085 


1449 1462 21708 

1442 14s5 1465 21708 
1164* 1860 1973 2147 
1487% 

1765% 

2087 
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PARTS 001602 780 7898 

PASCNT 001074 49 50S 

PC =%009007 44S 6 773% 838% 840% 987% 1493% 
* * 1795* 1801% 1804% 1832 

POPRO = 012600 

POP.SP= Oeebeb 

POPISP= 00S726 . 

PS = 177776 4518 % 806 1125* 1191% 1208% 1296# 


pls 001236 
See OO46 


RE = 40 
RETURN 001060 3 905* 
RING = 040000 

1797% 


RX. 002650 
RXCSR 001352 1080 ert 1089 1172# 


RXOBUF . 001354 
RXDONE= 000200 
RXERR = 100000 
RXSETU O04362 
RO =7000006 


Rl =%000001 
Re =xo00002 
R3 =x000003 
aa) =%000004 
RS =”000005 


SAYPC 001142 
SAVRO 901124 
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SAVR1  O01126 S46%  2038% Sue 2209 2217 












SP =x000006 044g = 751e 807% 994% 1025 1120% 1231 1299 1242* 1297% 1349% 13952% 1355% 
1492 1536 = 1636e §=1637* 1644 1648 1649 

1901 922 19294 1927 1965 

1985 1987* 2030 2054  2060e 2105 2106 2132 2i40x idee sisse aisse 2157s 





_ 
wo 
oO 
mM 
OK 
bo 








SPACNT= 010607 1990 2011. e014%  2025% 
SRD = 002000 662% 1078 1079 1030 
STACK = 001050 452% 751 807 934 1297 1661 1974 
START  O04274 824 904 12968 
ST = 000010 669% 1078 1979 1083 1090 1172 
STFLG 001241 5918 
STPSYN= 000400 664% 1172 
SvoS 010520 20348 

003104 1037 10434 

= 177570 4498 768 790 820 Bee 1028 1059 1500 1520 1549 1550 1SS4 1555 
1845 1852 1894 1903 1915 1920 1962 1969 1971 

cry = 000001 433% 820 







04000 
SWle 10000 4el# 1903 1915 









SW14 040000 4198 
SWi4A  O05634 1316 1365 1378 1391 1404 1417 1430 1443 1456 1467 
SW14.8 003026 10e8% 1040 1042 
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SYNC 
SYN * 


TEMP 


a 


091326 
001244 


TYBVss 


tar 
z 


0- +02 b- 9-2 p22 bo ho po 
abet bet eet ast a 


= 
fum 


oO 
i=) 


SSseBBsR 
RasERe 


oO 

o- 

ate] 
5. ~-3¢ 
Lat) 


004306 
010304 
104403 


019249 
090008 
000002 


bi0e4é 
515604 


17-SEP-76 


ote 


Cc 
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1002* 


1690+ 


1704 





1884 


* 19862 
* 1206 


1168 11978 1209% 1233% 


1368 1369 1371 «1377 
1408 15101416 = 1420 
49914551459 1460 
1944 «1998S 195i 1955 
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DZOFAB. 


<n ee ee a ee eee 





DOS 


1lll 1132 
1439 1452 
1504 

639 641 














a 


© 
Q Ort 
om 





mu ow 
1-4 





om 
a ee | 
= 








apap 





a3 Om 





a. 
AIO 


oam 
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on) 
wo 


NS 
NM--OUlLO sf 


0 

810 
105 
253 
743 
S 
5 
4 
0 
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DZOFAB.P11 CROSS 'REFERENC E TALE -- PERMANENT SYMBOLS 
REPT 488 


. TITLE 415 
«WORD S80 


ERRORS DETECTED: 0 

DEFAULT GLOBALS GENERA™ 0 

% ag de SEQ/SOL/CRFY —..wWM=DZOFAB 
E: 21 3_SECUNDS 


RUN 13 
RUN-TIME RATIO: 108/38=2.8 
CORE USED: 13K (2S PAGES) 


581 582 583 584 ses S86 


GOS 


765 





